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PREFACE 


Intercomm is a _ state-of-the-art teleprocessing monitor system, 
executing on the IBM System/370 family of computers and operating under 
the control of IBM Operating Systems (MVS/370, MVS/XA). Intercomm 
monitors the transmission of messages to and from terminals, concurrent 
message processing, centralized access to I/O files, and the routine 
utility operations of editing input messages and formatting output 
messages, as required. 


This manual documents the Automated SM (System Modification) 
Management Facility, a set of programs to aid in the application of SMs 
to Intercomm. ASMF is available at no charge to all Product Maintenance 
Agreement subscribers. SMs beginning with 1498 may be applied using 
ASMF. 


The following AMSF topics are discussed in this manual: 

® Commands 

e Execution 

e Application of SMs 

® Installation 

e Cross-reference listing utilities 

There are six appendixes to this manual. Appendix A gives the 
detailed syntax of SMPROF and SMLEVEL, the two macros used in installing 
ASMF. Appendix B describes the INTASMF procedure used to apply SMs. 
Appendix C provides the structure of the SM control records, which are 
supplied with standard SMs, and which the user must provide for experi- 
mental and user SMs. Appendix D gives examples of the printed output 


reports of ASMF. Appendix E lists messages produced by the facility. 
Appendix F documents the Intercomm cross-reference modules. 
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Chapter 1 


INTRODUCTION 


The Automatic System Modification Facility (ASMF) is a system for 
the automatic control, maintenance and application of program changes 
(SMs) to Intercomm modules. ASMF processes official System Modifications 
(SMs) and Experimental Modifications (XMs) provided for the user by the 
vendor, and User-coded Modifications (UMs). ASMF also permits removal 
of SMs already applied. Successors and prerequisites are automatically 
tracked, and a log is maintained. SMs may be selected for application 
or omitted, as appropriate. 


Only one of the above processes can be executed during one ASMF 
run. The processing is controlled by command control cards, macros and 
procedural parameters, as described in this manual. 


The ASMF system consists of the following: 
e Executable ASMF modules 


@ Modules, generated via ASMF macros, containing control infor- 
mation related to a specific user installation 


e Libraries containing the ASMF modules and Intercomm modules 


e Other data sets, such as the log, and the modifications 
themselves 


e INTASMF, a JCL procedure, which is controlled by execution 
parameters and a set of commands 


As illustrated in Figure 1, ASMF places the source and object code 
of the modified modules on intermediate libraries which are separate 
from the installation's production libraries. This enables an installa- 
tion to test modified modules without disturbing the existing versions. 
After testing, ASMF may be used to replace production library modules 
with modified modules from the intermediate library. 
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Chapter 1 Introduction 
1 SELECT SYS IN SMLIB 
2 APPLY SYS IN SYMSM SYMLIB 
MODSM SYMREL 
3 ACCEPT SYSIN SYML IB 
MODLIB 
4 PRTLOG SYSIN Log Activity 
Listing 


Figure 1. ASMF Process Overview 
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The ASMF process may be broken down into several discrete steps, 
as follows: 


An SM tape containing Assembler Language source fixes for Inter- 
comm, IEBUPDTE utility control statements and ASMF SM control records 
(SMINPUT DD), along with user-provided ASMF commands from the input 
stream (SYSIN DD) are read by the ASMF module in a SELECT operation (1) 
to produce partitioned data set SMLIB, whose members are of the 
following forms: 


e mmmmmmmnm (module name), which contains references to one or 
more SMs (SMnnnnxx, where nnnn is the SM number and xx is a 
numeric suffix for member within SM). 


© SMnnnn, which may contain prerequisite SM number(s) and will 
always contain references to one or more Intercomm modules 
(mmmmmmmm), depending upon the number of modules affected by 
the SM. 


e SMnnnnxx, which contains the IEBUPDTE utility control state- 
ments and Assembler Language source code of an SM for changing 
one, and only one, module. SMnnnn0OO will always be produced 
for an SM. SMnnnn01-99 may be produced, if the particular SM 
affects two or more modules. 


The SMLIB data set, along with ASMF commands from the input stream 
(SYSIN DD) are then input to an APPLY operation (2) which performs 
updates to Intercomm modules (copied from SYMLIB, or, if not found, from 
SYMREL) onto SYMSM and performs assembly and linkedits of Intercomm 
modules to MODSM. Note that if the APPLY step fails and it is necessary 
to start over, the steps listed in Chapter 5 to reuse ASMF must first be 
executed, then rerun the SELECT step. To test the new SMs, the order of 
DD statement concatenation for SYSLIB in the Intercomm linkedit must 
specify MODSM before MODLIB and MODREL. After thorough testing of the 
Intercomm system, as modified by the current batch of SMs, data sets 
SYMSM and MODSM, along with ASMF commands from the input stream (SYSIN 
DD) are input to an ACCEPT operation (3). Unlike SELECT and APPLY, for 
which ASMF provides the reversal operations REJECT and DELETE, there is 
no ASMF- supplied reversal operation for an ACCEPT. The ACCEPT 
operation copies (via IEBCOPY) the modified modules from SYMSM and MODSM 
to the production libraries SYMLIB and MODLIB. A record of activity is 
kept on SMLOG. SMLOG may be printed at any time by using the PRTLOG 
command (4). 


SYMLIB and MODLIB may not contain either user mods (UMs) or 
experimental SMs (XMs). After APPLYing a new set of SMs (output to 
SYMSM), they are to be examined to determine if user mods to the 
affected modules are still viable (needed, can be applied), and if an 
official SM has replaced code provided previously by an Experimental 
SM. If not, the UM or XM may be reapplied with this output directed to 
SYMUSR. Then assemble and linkedit the module from SYMUSR to MODUSR 
before testing the new SMs. The order of load library concatenation for 
SYSLIB in the Intercomm linkedit before testing then becomes: MODUSR, 
MODSM, MODLIB, MODREL. Remove MODSM after ACCEPTing the new SMs. 


2.1 
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Block sizes for SYMREL, SYMLIB, SYMUSR and SYMSM must all be the 
same, likewise for MODREL, MODLIB, MODUSR and MODSM. 


Standard SMs are distributed to Product Maintenance Agreement 
subscribers on a 1600 BPI standard label tape. File 1 contains the SMs 
in a printable format. File 2 contains the SMs along with ASMF SM 
control records (as described in Appendix C) for use with the INTASMF 
procedure. The procedure is listed in Appendix B; note that the DD 
statement SMINPUT refers to File 2 of the SM tape (or the user’s XMs or 
UMs file). 


The following JCL may be used to print the first file of the SM 
tape: 


//stepname EXEC PGM=IEBGENER 


//SYSPRINT DD SYSOUT=A 

//SYSIN DD DUMMY 

//SYSUT2 DD SYSOUT=A 

//SYSUT1 DD DSN=INT.SM. PRINT. mmm, DISP=SHR,DCB=DEN=3, 
J/ UNIT=TAPE, VOL=(PRIVATE, SER=volser), 

// LABEL=(1,SL) 


where mmm is the three-character month name on the external SM tape 
label; for example, JAN=January. 


This file contains four parts as follows: 


e Cumulative SM index by member name, describing all SMs issued 
to date for the current Intercomm release 


e Monthly index by SM, listing the new SMs (and applicable 
modules) in ascending numerical order 


e Detailed description and change decks for each SM. 


e Listing of 80-character records on File 2 (ASMF control 
records and change decks for each member within each SM). 


If you do not have a bundled (base Intercomm plus all special features) 
system, the SM printout should be examined to determine whether some 
SMs affect modules not provided on SYMREL (such as those related to the 
TOTAL data base, or VTAM Front End, for example). In this case, the 
select step can be used to specify a list of applicable SMs, rather 
than trying to apply all the SMs. Also note that on the detailed 
description of each SM, the experimental XM which this SM replaces is 
given in the upper right corner. Ensure that modules to which those 
experimental XMs may have been applied are not on any of the libraries 
used for the ASMF process or for subsequent assemblies and linkedits of 
Intercomm modules or user tables. 


2.2 
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Chapter 2 


COMMANDS 


2.1 INTRODUCTION 
There are seven ASMF commands: 


e SELECT--load selected SMs from the data set with the ddname 
SMINPUT (File 2 on the SM tape as distributed, or the user or 
experimental SM data set) onto the ASMF control data set 
(SMLIB) and verify if they are applicable to the user's 
system. 


e APPLY--apply selected SMs to the test libraries (SYMSM/MODSM). 
e REJECT--remove selected SMs which were applied to the test 


(SM) libraries without removing them from the ASMF control 
data set. 


e DELETE--REJECT selected SMs, and then remove them from the 
ASMF control data set. 


e ACCEPT--copy updated modules from the test libraries 
(SYMSM/MODSM) to the production libraries (SYMLIB/MODLIB). 


e PRINITP--print selected SMs. (See Appendix D.1.) 

e PRTLOG--print the log data set. (See Appendix D.2.) 

ASMF command cards are input via SYSIN, and may be intermixed with 
control parameter cards overriding predefined installation parameters, 


as explained in Section 2.4. 


In a given run, all commands must apply to SMs, XMs, or UMs. The 
three types may not be mixed. 


2.2 FORMAT 


Commands are free-form in card columns 1 through 71, except for 
continuations, which must begin in column 1. A nonblank character in 
column 72 indicates that the next card is a continuation. Commands and 
parameters are separated by one or more blanks. 


2.3 SYNTAX 


The following are the syntax specifications of the commands. 
Explanations of the parameters are given in Section 2.3.6. 
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22354 SELECT and PRINTTP 


(SELECT } [{XMS}] {for-month } [{{EXCEPT}sm-list)] [FORCE] 
(PRINTTP} [(UMS}] {((month-no)) [({[ONLY]) y] 
[ (SMS) ] [ {ALL )] 


2.3.2 APPLY 


APPLY [(XMS)] [{(EXCEPT)sm-list}] [(UPDONLY)] [FORCE] [’comment’ ] 
[(UMS)] [(([ONLY]) }] [ (ASMONLY) ] 
[(SMS)] [ (ALL }] [(UPDASM )] 


2 3:a3 REJECT and DELETE 
(REJECT) [ {XMS} ] EXCEPT)sm-list)] [FORCE] [’comment’ ] 


[{ 
(DELETE) [(UMS)] [({ [ONLY] } )] 
[(SMS}] [ (ALL )] 


2.3.4 ACCEPT 


ACCEPT [‘comment’ ] 


2.3.5  PRILOG 

PRTLOG 
2.3.6 Notes 
ALL 


specifies that all SMs are to be processed. This is the default. 


ASMONLY 
specifies that only assemblies and linkedits are to be done. 


comment 
is a comment, up to 40 characters long, enclosed in apostrophes, 
to be added to the log entry. 


EXCEPT 
specifies that all SMs, except those specified in the accompanying 
sm-list, are to be processed. 


FORCE 
specifies that the SMs indicated are to be processed, even if an 
SM does not meet all requirements for processing (such as that all 
predecessors have been processed). FORCE must be used to reapply 
an SM which had been rejected. 


for-month 
specifies the name (first three characters) of the month associated 
with the SMs (JAN for January, etc.). This is used to check 
against the data set name used for SMINPUT. 


month-no 
specifies the sequential number of the month coded in parentheses 
(l=January, 12=December) associated with the SMs. This is used to 
check against the data set name used for SMINPUT. 


ONLY 
specifies that only the SMs given in the sm-list are to be pro- 
cessed. This is the default if an sm-list is specified. 
sm-list 
is a sequence of SM numbers in ascending order of the form 
{number }[,..-, {number }] 
{number-number } [ {number-number } ] 
for example: 
870 
870,872-874,915 
900-902, 904 ,910-912 
There can be no spaces in the sm-list. 
SMS 
specifies Standard SMs, and is the default. 
UMS 
specifies User-coded SMs. 
UPDASM 
specifies that updates, assemblies and linkedits are to be done. 
This is the default. 
UPDONLY 
specifies that only updates are to be done. 
XMS 


specifies Experimental SMs. 
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2.4 CONTROL PARAMETERS 


Certain parameters which are defined for the installation in the 
Profile Table (load module ASMFPROF, created by the SMPROF macro) may be 


overridden via input control commands submitted in the job stream with 
the ASMF command cards. 


The format for these control commands is the same as for the ASMF 
command cards: free-form in columns 1-71, with the parameter name 
separated from the parameter value by one or more spaces. (The equals 
sign should not be coded.) 


The control parameters specified apply to all the ASMF command 


cards following in the same job, unless they are themselves overridden 
by succeeding control parameters. 


Parameters of the SMPROF macro beginning with '#' are overridden 
at execution time via the PARM subparameter of the EXEC JCL statement. 
(See Appendix A.) 


All parameters of the SMPROF macro except those beginning with '#' 
may be overridden through the input job stream. These are: 


ASM 
ASMRC 
COPY 
LKED 
LKOP 
UPD 
ZAP 


For example, the following may be used to specify a different 
Assembler module: 


ASM LIXFOX00 
If LKOP is specified, its values must be coded without being 
enclosed in quotes, and must be separated by commas, with no embedded 
blanks. 


For example: 


LKOP LIST,LET,NCAL, REUS 
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EXECUTION 


gL PARAMETERS 
ASMF is executed via a procedure with the name INTASMF. The 
procedure as released is given in Appendix B. There are nine procedure 


symbolic parameters and four program execution parameters that may be 
coded. 


Sele Procedure Symbolic Parameters 


The nine procedure symbolic parameters are: 


P 
specifies the Intercomm library prefix. The default is INT. Code 
in single quotes if more than one high level qualifier is used, 
for example: P=’INT.REL9’. 

Q 
specifies the SM library qualifier/suffix. The default is SM. 

L 
specifies the production library suffix. The default is LIB. 

Vy 
specifies the volume serial number of the SMINPUT data set. 

MON 
specifies the SM input data set's DSN suffix (first three 
characters of the month name). 

REG 
specifies execution region size. The default is 300K. 

SYSDA 
specifies the type of system direct access working storage. 
Default is SYSDA. 

TAPE 
specifies the type of system tape unit. Default is 9TRK. 

WKSPAC 


specifies the disk work file space allocated for each work data 
set. The default is ‘'(CYL,(3,1)’. 
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3.1.2 Program Execution Parameters 


Certain ASMF control values specified on the SMPROF macro may be 
overridden via the PARM field of the EXEC statement for stepname ASMF as 
keyword parameters. 


The SMPROF parameters which may be overridden in this way are: 
#CT (the maximum number of ASMF SM control cards per SM), #IN (the 
number of control commands per run), #MD (the maximum number of modules 
per run), and #SM (the maximum number of SMs per run). 


For example, to respecify the maximum number of SMs and modules 
for a particular run, the following must be coded: 


// EXEC INTASMF, PARM.ASMF=' #SM=300 , #MD=600' 


For a complete description of the meaning of those values, see the 
SMPROF macro description in Appendix A. 


S42 ATA SET 


The following data sets are required for ASMF processing (assuming 
P=INT and Q=SM): 


e INT.SMLIB--ASMF control data set. (If data set blocksize 
greater than 6400 (Release 10) or 3200 (Release 9), see SMPROF 
macro, parameter #MD in Appendix A). 


@ INT.SMLOG--ASMF activity log (print) data set. 


@ INT.SYMSM--intermediate library to hold the source code of 
modified modules. 


e INT.MODSM--intermediate library containing the modified load 
modules. 


e INT.SYMLIB and INT.SYMREL--libraries containing current 
Intercom source modules 


e INT.MODLIB and INT.MODREL--libraries containing current load 
module versions and ASMF load modules 


e SMINPUT--the distributed SM minireel or card-image input for 
experimental or user SMs. 


It is assumed that the installation’s Assembler resides on 
SYS1.LINKLIB. If this is not the case, the load library containing the 
Assembler must be concatenated to the STEPLIB DD statement for step 
ASMF. 


4.1 


SMs. 


ASMF: 
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APPLYING SYSTEM MODIFICATIONS 


EXPERIMENTAL OR USER SMs 


The following steps should be followed to apply experimental or 
user SMs using ASMF. The procedure symbolic parameter Q=XM should be 
specified for each step. 


i. 


Load the SMs from SMINPUT into INT.XMLIB using the SELECT 
command. SMINPUT must contain control records, as explained 
in Appendix C. The DD statement for SMINPUT must be changed 
as appropriate to specify the source of SMINPUT. 


Apply the SMs using the APPLY command. 


Relink the Intercomm execution load module into a test library 
and test the SMs by using the modified version of Intercom. 


If changes to an SM are needed, back off and delete the SM 
from INT.XMLIB using the DELETE command. Make the necessary 
changes to the SM and repeat steps 1 through 3 until the SM is 
correct. 


When an experimental SM becomes a standard SM, apply the 
corresponding standard SM following the steps outlined in 
Section 4.2. 


The ACCEPT command should not be used with experimental or user 


The following steps should be followed to apply official SMs using 


Request loading of the SMs from the SM tape defined for 
SMINPUT into INT.SMLIB by using the SELECT command. 


Apply the SMs using the APPLY command. 


Relink the Intercomm execution load module into a test library 
and test the SMs by using the modified version of Intercomn. 


If necessary, reject SMs causing problems by using the REJECT 
command. 
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5. Accept SMs into the user production libraries (SYM/MODLIB) by 
using the ACCEPT command. 


6. Relink Intercomm to create the production version. 


7. Seratch and reallocate SMLIB, MODSM and SYMSM to prepare them 
for the next new batch of SMs. 


NOTE: TSO/SPF users updating Intercomm modules via SPF should 
ensure that the TSO PROFILE parameters AUTONUM, NUMBER, 
and STATS are set off, as they cause directory entry 
modification of the Intercomm modules source library. 

ASMF modifies directory entries, and expects to find 
certain information intact. 
4.3 SAMPLE JCL 
For a SELECT operation for all SMs on an SM tape, use: 


EXEC INTASMF , MON=month, V=tape-volser 


//ASMF .SYSIN DD * 
SELECT month 
/* 


Where month is the 3-character month name from the SM tape DSN. 
See Chapter 2 for SELECT statement syntax when only selected SMs are 
desired (because some SMs update modules not issued on your SYMREL). 


For an APPLY operation to apply the selected SMs (from SMLIB), 


use: 
// EXEC INTASMF , MON=month, V=tape-volser 
//ASMF .SYSIN DD * 
APPLY 
/* 


All selected SMs (those put on SMLIB data set) will be applied and the 
updated modules will be assembled and linked (SYMSM/MODSM data sets). 
At this time, determine (from list of updated modules/macros) whether 
user system tables on SYM/MODUSR need be reassembled due to macro 
changes. Use: 


// EXEC ASMPCL, Q=USR , U=SM , NAME=table-name , LMOD=table-name 
so that the modified macro version on SYMSM is used. Adda 

//ASM.SYSIN DD DSN=INT.SYMREL(table-name) , DISP=SHR 
Statement for tables that COPY user entries such as BTVRBTB. If an 


updated version of the base Intercomm table is on SYMSM or SYMLIB, 
change the SYMREL data set name accordingly. 


10 
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ASMF INSTALLATION PROCEDURES 


A SM tape supplied for ASMF installation contains one data set 
following the two SM files: INT.MODASMF. 


INT.SYMREL provides the following source members: 


INTASMF--the ASMF JCL procedure 

SMLEVEL--an ASMF macro (define system release/SM level) 
SMPROF--an ASMF macro (define user installation profile) 
PROFILE--sample source member, showing use of SMPROF macro 
SMS--sample source member, showing use of SMLEVEL macro 
XMS--sample source member, showing use of SMLEVEL macro 


INT.MODASMF contains the following load modules: 


SMDELET ASMFPROF 

SMCOPY GETMEM 

SMSTOW INSORT 

SMSTAT INTASMF (executed ASMF module) 

SMREJ ECT LOGIT 

SMMAIN PRTLOG 

SMAPPLY PUTSSI 

SMACCEPT READD 

IAIM.... (cross-reference listing utilities--see Appendix F) 


To install ASMF, the following steps are recommended: 


- 1. If not done at Release 9 installation time, use IEBCOPY, as 
illustrated below, to copy the INTASMF procedure from SYMREL 
into the installation’s procedure library (usually 
SYS1.PROCLIB) 


// EXEC PGM=IEBCOPY 


//S¥SPRINT DD SYSOUT=A 
//IN DD DSN=INT .SYMREL, DISP=SHR 
//OUT DD DSN=installation-proclib-name, 


// other dd statement parms as required 
//S¥SUT3 DD UNIT=SYSDA , DISP=( , DELETE) , SPACE=(TRK, (1,1) ) 
//SYSIN DD * 

COPY I-IN,0=-OUT 

SELECT MEMBER=INTASMF 
/* 


ll 


Chapter 5 


SPR 239 7/88 Installation 


Use IEBCOPY, as illustrated below, to copy INT.MODASMF into 
MODREL. ASMF modules are supplied on the SM tape (file 3) in 
load module form. No further linkedits are required. 


EXEC PGM=IEBCOPY 


//SYSPRINT DD SYSOUT=A 
//SYSUT3 DD UNIT=SYSDA , SPACE=(TRK, (5,5) ) 
//SYSUT4 DD UNIT=SYSDA,SPACE=(TRK, (5,5)) 
//IN DD DSN=INT .MODASMF , LABEL=(3,SL) , DISP=OLD, 
// UNIT=unit-name , DCB=DEN=3, 
// VOL=SER=volser-of-minireel 
//OUT DD DSN=INT.MODREL, DISP=OLD 
//SYSIN DD * 
COPY I=((IN,R)) ,O=OUT 
/* 


Under MVS, the library containing the ASMF load modules must 
be authorized. The modules INTASMF, SMAPPLY, SMREJECT and 
SMCOPY dynamically invoke system programs such as_ IEBUPDTE, 
the Assembler, Linkage Editor and IEBCOPY. Therefore, 
INT.MODASMF must be authorized. This is accomplished by 
placing the name of the MODASMF library in the IBM system 
member IEAAPFOO on SYS1.PARMLIB. Use IEBCOPY (as illustrated 
above) to unload and create a new PDS called INT.MODASMF. 
Change the OUT DD statement to allocate and specify 
INT.MODASMF, for example: 


/ /OUT DD DSN=INT .MODASMF , DISP=(NEW, CATLG, DELETE) , 
// UNIT=SYSDA, SPACE=(TRK, (15,1,5)), 

// VOL=SER=volser, 

// DCB=(DSORG=PO , RECFM=U , BLKSIZE=6160) 


Note that ASMF modules are all linked with the REUS attribute, 
not RENT. Use only the authorized MODASMF data set for 
STEPLIB in the INTASMF procedure. IAIM... modules (and 
GETMEM) do not have to be executed from an authorized library 
and should be on MODREL. 


In addition, the main load module INTASMF must be assigned the 
authorization code via a relink to MODASMF as follows: 


// EXEC LKEDP,Q=ASMF, 
// PARM. LKED=’ LIST, LET , REUS , SIZE=(256K, 100K) 
//LKED.SYSIN DD * 
INCLUDE SYSLMOD( INTASMF) 
SETCODE AC(1) 
NAME INTASMF(R) 
/* 
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Further information on authorized libraries may be found in IBM's 


OS/VS2_ System Programming Library: Supervisor or MVS/XA SPL; System 


Macros and Facilities, Voll. 


The following additional steps should be performed to execute 
(reuse) ASMF: 


1. Using CREATEGF, allocate and initialize INT.SMLOG, the ASMF 
Standard SM log data set and INT.XMLOG, the ASMF Experimental/ 
User SM log data set. BLKSIZE=3152 is recommended for 3330 
disks. One 3330 track should hold about 200 log entries. 
SPACE=(CYL,(1)) is a reasonable allocation. 


2. Assemble and linkedit the ASMFPROF module using the SMPROF 
macro, (see Appendix A), and place the load module on MODREL, 
or MODASMF if used. 


3. Assemble and linkedit the SMS module (reflecting the current 
level of standard SMs of the installed Intercomm) using the 
SMLEVEL macro (see Appendix A). A current member is supplied 
on MODREL of an Intercomm release tape and automatically 
updated by INTASMF execution. 


4. Assemble and linkedit the XMS module (reflecting the current 
level of experimental SMs of the installed Intercomm using the 
SMLEVEL macro. (See Appendix A.) 


5. Change STEPLIB and other DD statements, as required, for the 
installed INTASMF procedure (see Sections 3.1 and 3.2 and 
Appendix B). If an authorized MODASMF is used for STEPLIB, do 
not concatenate MODLIB or MODREL with it. 


6. The current XMS and SMS load modules must reside in one of the 
libraries defined for STEPLIB for step ASMF in the INTASMF 
procedure. For the first execution of ASMF after installing 
an Intercomm release tape, copy SMS from MODREL to MODASMF, if 
necessary. For subsequent executions, copy SMS from MODLIB 
(where the updated member is stored by ACCEPT step of ASMF 
execution - see Chapter 1). 


7. Allocate INT.SMLIB, the ASMF Standard SM control data set and 
INT.XMLIB, the ASMF Experimental/User SM control data set. 
Specify DCB=(RECFM=FB,LRECL=80, BLKSIZE=1280, DSORG=PO). A 
reasonable allocation for 300 SMs on a 3330 disk is 
SPACE=(CYL, (3,1,50)). If #CT (specified via SMPROF or via 
PARM.ASMF at execution) is greater than 16, BLKSIZE should be 
respecified as at least #CT x 80. The space allocation for 
INT.XMLIB can be appropriately smaller. 
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Allocate 
follows: 


four ASMF 


//EXEC PGM=IEFBR14 


/ /SYMSM 
// 


/ /MODSM 
// 


// SYMXM 
// 


/ /MODXM 
// 


DD 


DD 


DD 


DD 


DSN=INT. 


DCB=INT 


DSN=INT 
DCB=INT 


DSN=INT. 


DCB=INT 


DSN=INT 
DCB=INT 


Installation 


intermediate test library data sets 


SYMSM, SPACE=(CYL, (10,2,25)), 


.SYMLIB... 


.MODSM, SPACE=(CYL, (5,1,25)), 
.MODLIB... 


SYMXM , SPACE=(CYL,(1,1,25)), 


.SYMLIB... 


.MODXM , SPACE=(CYL,(1,1,25)), 
.MODLIB... 
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ASMF MACROS 


The following macros are documented in this appendix: 


e SMLEVEL--create the SMS, XMS, and/or UMS modules, specifying 
SM installation levels 


e SMPROF--create the Profile Table (load module ASMFPROF), 
specifying installation-dependent systemwide parameters and 
constants. 


15 


Appendix A ASMF Macros 
SMPROF SPR 239 7/88 SMPROF 


SMLEVEL--Create the SMS or XMS Module 


The SMLEVEL macro is used to create the SMS, XMS and UMS modules. 
Each must be done separately and need only be done for the installation 
of ASMF. Each will be automatically updated by ASMF as maintenance is 
performed. The syntax is identical for each. 


The form of the SMLEVEL macro is as follows: 


symbol SMLEVEL | [(APPLY )=(sm-number[,...,sm-number] ) ] 
[ (NAPPLY) 


[ , BASE={ lowest-sm-number} ] 
{1497 ) 


[ ,LAST={highest-sm-number)} ] 
[ (1497 }] 


[ (YES) ] 


[ ,RELEASE=(release-number } |] 
[ (0900 )] 


symbol must be SMS or XMS or UMS. 


APPLY 
specifies a list of SM (XM/UM) numbers (between BASE and LAST) 

Z which have been applied. If the list exceeds assembler macro 
limits, use more than one SMLEVEL macro. If more than one SMLEVEL 
macro is used to create either the XMS, UMS or the SMS module, 
they must either all use APPLY or all use NAPPLY. APPLY should be 
used if more SMs have not been applied than have been applied; 
NAPPLY should be used if more SMs have been applied than have not 
been applied. 


BASE 

specifies the lowest SM (XM/UM) number applied at this 
installation or as specified on the latest Intercomm release 
tape. For SMS, this number must be no lower than 1497. The 
default is 1497 for Release 9.0, 1730 for Release 10.0. It is 
assumed that all SMs below the BASE level have been applied to the 
SYMREL and MODREL libraries. All new SMs accepted between BASE 
and LAST are assumed to reside on SYMLIB and MODLIB. 
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GEN 


LAST 


specifies whether or not this is the only or last SMLEVEL macro to 
be coded for this module. NO indicates that another SMLEVEL macro 
follows. The default is YES. 


specifies the highest SM (XM/UM) number already applied at this 
installation. It must be greater than or equal to the BASE and 
must not be greater than the lowest number of the SM that you are 
about to apply. The default is 1497 for Release 9.0, 1730 for 
Release 10.0. 


NAPPLY 


specifies a list of SM numbers (between BASE and LAST) which have 
not been applied. If more than one SMLEVEL macro is used to 
create either the XMS, UMS or the SMS module, they must either all 
use APPLY or all use NAPPLY. APPLY should be used if more SMs 
have not been applied than have been applied; NAPPLY should be 
used if more SMs have been applied than have not been applied. 


RELEASE 


specifies the Intercomm release, as a four-digit number. The 
default is 0900 for Release 9.0, 1000 for Release 10. 
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SMPROF--Create the PROFILE Table 


The SMPROF macro is used to create the Profile Table (load module 
ASMFPROF), which specifies installation constants and parameters. 


The four parameters beginning with # may be overridden at INTASMF 
execution time via the PARM subparameter of the EXEC JCL statement. 
(See Section 3.1.2.) The others can be overridden as control parameters 
submitted in the SYSIN input stream along with ASMF command cards. (See 
Section 2.4.) 


The form of the SMPROF macro is as follows: 


[symbol] ] SMPROF [#CT={max-num-command-cards-per-sm} |] 
[ (16 )] 
[, #IN=(max-num-control-commands-per-run) | 


[ (16 )] 


[ , #MD=(max-num-modules-per-run} ] 


[ (400 Y] 


[ , #SM=(max-num-sms-per-run} ] 
(150 Y] 


[ ,ASM=(assembler-module-name) | 


(ASMBLR )) 


[ ,ASMRC=(max-successful-return-code) |] 


(9 )) 


[ ,COPY=(copy-utility-module-name)} ] 
[ ( TEBCOPY )] 


[ , LKED=( linkage -editor-module-name ) ] 
( (LINKEDIT )] 


[, LKOP=('link-edit-options’ }] 
(“LIST XREF. LET NCAL’ ) | 


[ ,UPD=( source-update-utility-module-name} ] 
( LEBUPDTE )] 


[,ZAP=({superzap-utility-module-name) ] 
[ (IMASPZAP )) 
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##CT 


FIN 


i#MD 


#SM 


ASM 


ASMRC 


COPY 


LKED 


LKOP 


UPD 


specifies the maximum number of ASMF command cards per SM. _ The 
default is 16. This value may be overridden at execution. 


specifies the maximum number of control parameter commands per 
run. The default is 16. This value may be overridden at 
execution. 


specifies the maximum number of modules (Csects/Macros/Dsects) to 
be updated per run; also specifies the blocksize of SMLIB divided 
by 16. If SMLIB blocksize/16 is greater than the default, then 
this parameter must be overridden at execution time (see example 
in section 3.1.2). The default is 400 for Release 10 (200 for 
Release 9). This value may be overridden at execution. 


specifies the maximum number of SMs (SMs/XMs/UMs) per run. The 
default is 150. This value may be overridden at execution. 


specifies the name of the Assembler module (IEV90, IXFOX0O, 
etc.). The default is ASMBLR. 


specifies the highest assembly return code to be considered 
successful. The default is 0. 


specifies the name of the copy utility module. The default is 
IEBCOPY. 


specifies the name of the Linkage Editor module. The default is 
LINKEDIT. 


specifies linkedit options, enclosed in apostrophes. The default 
is ‘LIST,XREF,LET,NCAL’. MVS users should then relinkedit all 
LPA- eligible modules as RENT (or place control parameter 
overrides in the input stream for the APPLY process). 


specifies the name of the source update utility module. The 
default is IEBUPDTE. 


specifies the name of the Superzap utility module. The default is 
IMASPZAP. 
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Appendix B 


INTASMF PROCEDURE 


The following is the INTASMF cataloged procedure as supplied. The 
user may modify it to fit installation requirements as necessary. 


[| [RRR ERRRRERR RRR ERR ERR RRR RRR ERERERRER EER RRRRRERERERERERRERRRERE 


//* * 
/ |*** INTE RCOMM****AUTOMATED-SM-MANAGEMENT-FACILITY PROCEDURE***#**x*#ke#k# 

/* * 
Da ise atase aeons taaaeerausveeeeee eee aesee te 
//INTASMF PROC P=INT, *FILES STANDARD HIGH LEVEL INDEX * 
// Q=SM, *WORK LIBRARIES QUALIFIER * 
// L=LIB, *PRODUCTION LIBRARIES QUALIFIER * 
// SYSDA=SYSDA, *SYSTEM DIRECT ACCESS WORKING STORAGE * 
// WKSPAC='(CYL,(3,1))', *WORK FILES SPACE ALLOCATION * 
// TAPE=9TRK, *9 TRACK TAPE UNIT STANDARD NAME * 
// V=VOLSER, *SM INPUT TAPE VOLUME SERIAL NUMBER * 
// MON=MON , *SM BATCH MONTH (3 CHARACTERS) * 
// REG=300K *REGION SIZE * 
//* 6 
//* * 
//* * 
[| [RRRRRERERKRERERERRERERERRERERERER ER RERERER EER RRR ERR RRRERRERERERERRERK 
//* STEP 1 - TEMPORARY DATA SET ALLOCATION * 
[| [RRR ERR RRR REE ER EARRERERR ERR EER ERERRERERERRERERRKRKK 
//* = 
//S1 EXEC PGM=IEFBRI14 


//ASMPUNCH DD DSN=&&SMPUN, SPACE=&WKSPAC , UNIT=&SYSDA, DISP=(, PASS) 
//SSIOUT DD DSN=&&SMSSI,SPACE=(TRK, (1)),UNIT=&SYSDA, DISP=(, PASS) 


//* * 
//* * 
//* * 
| [RRR ERE RRR ERRERERER ER EERE EREREERREERERRREREREREERRERERERERERER 
//* STEP 2 - ASMF EXECUTION * 
[| [RRR ERERERERRRERERERERERERREERERRREREREREERREREREEK 
//* # 
/ /ASMF EXEC PGM=INTASMF , REGION=&REG 

//STEPLIB DD DSN-&P. -MODME, DISP= SHR <= keDMH CL 

// ‘3 : : ps 

//* 

//* 

//* 


//SMLIB DD DSN=&P..&Q.LIB, DISP=SHR 

//SYSPRINT DD SYSOUT=A, DCB=(RECFM=FBA, BLKS IZE=960 , LRECL=96 ) 

//SMSYSOT DD SYSOUT=A, DCB=(RECFM=FBA, BLKSIZE=810,LRECL=81) 

//LISTOUT DD SYSOUT=A,DCB=BLKS IZE=121 ***USER MAY OVERRIDE*** 
//LOGPRINT DD SYSOUT=A 


(continued) 
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/ /SMLOG DD 
//COPYUT3 DD 
//COPYUT4 DD 
//UPDSYSIN DD 
//LIBUTL DD 
// DD 
// DD 
//LIBUT2 DD 


// DD 
// DD 
// DD 


//ASMUT1 DD 
//ASMUT2 DD 
//ASMUT3 DD 
//SSIOUT DD 
//ASMPUNCH DD 
//LNKSYSN DD 


// DD 
//LNKSLIB } DD 
// | bo 
// DD 


/ /LNKSLIBO} DD 
//LNKSLIB1} DD 
/ /LNKSLIB2). DD 
//LNKSYSLM DD 
//LNKUT1 DD 
//ASMSYSN DD 
// DD 
// _ DD 
/ /ASMSYSNO /DD 
//ASMSYSN1: DD 
/ /ASMSYSN2{DD 
//sysuDUMP ‘DD 
//SMINPUT DD 
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DSN=&P..&Q.LOG, DISP=SHR 

UNIT=&SYSDA, SPACE=&WKSPAC 

UNIT=&SYSDA, SPACE=&WKSPAC 

DSN=&P. .&Q. LIB, DISP=SHR 

DSN=&P..SYM&Q, DISP=SHR 

DSN=&P..SYM&L, DISP=SHR 

DSN=&P..SYMREL, DISP=SHR 

DSN=&P..SYM&Q, DISP=SHR 

DSN=&P..SYM&Q,DISP=SHR ~ 

DSN=&P..SYM&L,DISP=SHR_ 

DSN=&P..SYMREL, DISP=SHR 

DSN=SYS1.MACLIB, DISP=SHR 

UNIT=&SYSDA, SPACE=&WKSPAC } 
UNIT=(&SYSDA, SEP=(ASMUT1 ) ) , SPACE=&WKSPAC } See note 
UNIT=(&SYSDA, SEP=(ASMUT1,ASMUT2)) ,SPACE=&WKSPAC } 
DSN=*.S1.SS IOUT, VOL=REF=*.S1.SSIOUT, DISP=(OLD, DELETE) 
DSN=*.S1.ASMPUNCH, VOL=REF=*.S1.ASMPUNCH, DISP=(OLD, DELETE) 
DSN=*.S1.SS IOUT, VOL=REF=*.S1.SS IOUT, DISP=(OLD, DELETE) 
DSN=*.S1.ASMPUNCH, VOL=REF=*.S1.ASMPUNCH, DISP=(OLD, DELETE ) 
DSN=&P. .MOD&Q, DISP=SHR 

DSN=&P. .MOD&L, DISP=SHR 

DSN=&P..MODREL , DISP=SHR 

DSN=&P. .MOD&Q, DISP=SHR 

DSN=&P. .MOD&L, DISP=SHR 

DSN=&P. .MODREL, DISP=SHR 

DSN=&P. .MOD&Q, DISP=SHR 


UNIT=&SYSDA, SPACE=&WKSPAC } See note 


‘ DSN=&P. . SYM&Q, DISP=SHR 
_DSN=&P..SYM&L,DISP=SHR 
iDSN=&P.. SYMREL , DISP=SHR 


DSN=&P..SYM&Q, DISP=SHR 
DSN=&P. . SYM&L, DISP=SHR 
DSN=&P. .SYMREL, DISP=SHR 


“SYSOUT=A 


DSN=INT .SM. PUNCH. &MON, DISP=(OLD, PASS) , 


// VOL=(PRIVATE, RETAIN, SER=&V), 

// LABEL=(2, SL) , UNIT=(&TAPE, , DEFER) 

NOTE: ASMUT1, ASMUT2, ASMUT3 and LNKUT1 are eligible for VIO, which 
offers possible performance improvements. 
For execution of this procedure under MVS, the STEPLIB library 
must be authorized (see Chapter 5, installation step 3), and 

// DD DSN=SYS1.AMODGEN,DISP=SHR 


must be added to the concatenation for ASMLIB (after DD statement 
for SYS1.MACLIB). 


Data 


po . 
hn s ‘ 


set names 

format x.SYMyyy, 
qualifiers 
dsname lowest-level qualifier. 
44 characters, including periods. 


for ddnames ASMSYSNO-ASMSYSN2 must be of the 
where '‘x' may be any number of high-level 
to INT), and ‘yyy' is the suffix of the 

The data set name must not exceed 


Ly Tore “ \ Ss fe ni tf) - i ' . ieee vyNh a 


oe NSN che 
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SM CONTROL RECORDS 


The data set SMINPUT must contain SM control information required 
for ASMF. This is autanatically supplied (on File 2 of the SM tape) 
for Standard SMs but must be coded by the user for XMs and UMs. This 
is in the form of 80-byte control records, as follows: 


Bytes | Contents | lace == SC 
ee ee (en Ie Identifies SM control record (See NOTE) 
ee et eee Type of SM control record: 
SM SM Decl aration 
UM User SM 
»M Experimental SM 
~ PRE Prerequisite SM list 
ASM Reassembly list 
MOD Module Header 
e-7)—|ltk | tsi—sSSSSSS 
~g-80 | operands | Operands vary depending on the type of | 


SM control record. Operands are fixed- 
length and separated by one blank. 


SM control records starting with "++" should not ‘be put 


on a PANVALET data set, where "++" has ai special 
significance. 


Each SM begins with the SM Declaration, as follows: 


123... 8 13 18 23 


++SM nnnn rrrr [ssss] [xxxx] 
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where: 
@® nnnn is the four-digit SM number 
@® orrrr is the applicable four-digit Intercom release number 


@® ossss is the four-digit Intercomm lower release number (if 
this SM applies to more than one release level) 


@ xxxx is the four-digit number of the experimental SM being 
re placed by this SM, if any. 


For example: 


123... 8 13 


++SM 0823 0701 


denotes SM 823 for release 7.01. 


One or more optimal Prerequisite SM lists may follow the SM 
Decl aration, as follows: 


123... 8 13 


++PRE nnnn nnnn .... 


where nnm is a four-digit SM number which is a prerequisite for the 
SM being processed. 


One or more optimal Reassembly lists may fol1 ow: 


123... 8 17 


++ASM aaaaaaaa aaaaaaaa ... 


where aaaaaaaa is an eight-character name of one or more modules which 
must be reassembled after applicatio of the current SM. Each module 
name is left-justified and padded with blanks. 
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SM Control Records 


Each IEBUPDTE deck for a module is immediately preceded by a 
Module Header, formatted as follows: 


NOTE 


mmmmmmmm is the name of the module affected by the subsequent 
IEBUPDTE deck. The module name is left-justified and padded 
with blanks. 


t indicates the type of module, as follows: 


C--CSE CT 
D--DSECI or COPY code 
M--Macro 


Z ~-Super zap 


For users who have changed the source member names of 
Intercomm modules or tables, and for those using the 
Multiregion Facility (where multiple versions of the 
SPALIST, for example, are required), File 2 of the SM 
tape may be off-loaded to a data set where the user can 
add/change member names on the Reassembly control card 
(++ASM), or add more Reassembly control cards, as 
needed. This new file then becomes the SMINPUT data set 
(see the dicussion of INTASMF execution in Chapter 3) 
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PRINIED REPORTS 


This appendix gives samples of the two reports which are out put 
by ASMF, the listing of SMs via the PRINTIP command, and the listing of 
the SM Log via the PRILOG command. 


D.1 #$SM LISTING 


The following is an example of an SM listing issued by ASM: 
SYSTEM MODIFICATION 1 1 7 8 
++SM 1178 0800 0700 


++MOD VILUCMD C 


of CHANG: NAME=VTL UCMD , SSI=0 80011 78 TC 


D.2 SM LOG 
The following is an example of the SM Log listing issued by ASM. 
0001 91800132 IJKPRINT SM REL # 91800134 U X 0700 C 
0002 91800132 IJKPRINT SM SM # 91800134 U X 0701 C 
0001 91800132 IJKPRINT SM # 91800134 A X 0701 C 
0001 91800134 IJKPRINT SM S X 0701 M 
0003 91800134 IJKPRINT SM REL LIB 91800147 U X 0700 C 
0004 91800145 ATTRIB SM REL LIB 91800147 U S 1181 M 
0005 91800145 COMMAND SM REL LIB 91800147 U S 1181 M 
0006 91800145 CNILCHR SM REL LIB 91800147 U S 1181 M 
0007 91800145 MMUEDO03 SM REL LIB 91800147 US 1182 C 
0002 91800145 MMUEDO03 SM LIB 91800147 A S 1182 C 
0002 91800145 SM LIB 91800147 C NOW ACCEPT SMS 


TM  LUBFLAG2,LUBDIOK 


DATA TRAFFIC O K 


SM1178 08921000 


BZ 4(R7) NO SEND ALLOWED SM1178 08921100 
DC C'SM ' 99999997 
DC X'08001178 ' 99999998 


27 


Appendix D Printed Reports 


The report contains the following: 


Field Contents 
l Sequence number within function 
2 Time stamp in the form YDDDHHMM 
3 Module name 
4 Name of library updated. This is extracted from ASMSYSNO 


ddcard DSN. 


5 Name of library used as input to IEBUPDTE. This is 
extracted from ASMSYSNO, ASMSYSN1, or ASMSYSN2. 


6 Name of library into which the module was ACCEPTed or an # 


indicating that the module was scratched. Extracted from 
ASMSYSNO, ASMSYSN1, or ASMSYSN2. 


7 Time stamp of when module was accepted or scratched in the 
form YDDDHHMM. 


8 Function code, as follows: 
U--U pdate 
A--Assembly 
S--Scratched 
C--Co py 
Z-—-Zap 

9 Class code, as follows: 


S--Standard SM 
X--Experimental SM (XM) 
U--User-Coded SM (UM) 


10 SM, XM or UM number 
11 Type code, as follows: 
C--CSECT 
D--DSECT 
M--Macro 
Z--Superzap 
12 Comments from APPLY, REJECT, DELETE, or ACCEPT command card 
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MESSAGES AND CODES 


NOTE: In certain cases messages having different text and different 
Meaning are issued with the same control number (such as 
SMACCEPT-001). Those messages are indicated in this listing by 
an asterisk (*) in the left margin which is not actually part of 
the message. 


Messages which are purely informative and do not indicate an 
error condition are indicated by a bullet (@) in the left margin 
which is not actually part of the message. 


Unless otherwise indicated, current execution continues, and 
remaining SMs are processed as possible after an error is 
detected. 


BDAM RIN ** BLKSIZE MISSING 


Cause: Internal program’ error. LOG BLKSIZE=0. Abend 65 
follows. 


Action: Submit MSR with dump. 


BDAM RIN ** NEG NO. BYTES PASSED 


Cause: Internal program error. READ called with invalid 
parameter. Abend 65 follows. 


Action: Submit MSR with dump. 


BDAM RIN ** READ ERR, DCBADDR=xxxxxx, RELBYTE=yyyyyyyy 


Cause: Read error: EOF reached on READ operation. Internal 
program error. Abend 65 follows. 


Action: Submit MSR with dump. 


BDAM RIN ** REL BYTE 0 INVLD 


Cause: Internal program error. READ called with invalid 
parameter. Abend 65 follows. 


Action: Submit MSR with dump. 
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Messages and Codes 


BDAM RIN ** WRITE ERR, DCBADDR= xxxxxx, RELBYTE=yyyyyyyy 


Cause: 


WRITE ERROR: SMLOG out of space. Abend 65 follows. 
Print SMLOG, scratch it, 


it using CREATEGF. 


then reallocate and intialize 
Rerun job. 


SMACCEP T 


Cause: 


-001- ACCEPT PROCESSING COMPLETE WITH ERRORS 

Successful processing of some SMs. IEBCOPY errors 
prevented processing all  SMs. Copy of successful 
modules from PMI.SYMSM and PMI.MODSM to _ production 


libraries completed. 


Examine IEBCOPY error messages for correction procedures. 


-001- ACCEPT PROCESSING COMPLETE WITH NO ERRORS 


Successful processing of ACCEPT command. 


-001- ERROR IN SMSTATUS ROUTINE - ABORTING 


Error in processing. Other messages listed. 


Examine other error messages for correction procedures. 


-002- SMnnnn A PREREQ FOR xxxxxxxx HAS NOT BEEN APPLIED 


Prerequisite SM not applied to system. 
If rejected SM is 


specify FORCE in APPLY command, and run again. 
rejected SMs need be reapplied. 


required apply prerequisite SM, or 
Only the 


-003- SMnnnnnn WILL BE FORCE APPLIED 

Prerequisite SM not applied to system, but FORCE was 
specified on APPLY command. The SM is FORCE applied. 
This message is always preceded by SMAPPLY-002. 


Error in ASMF control data set. 
records, 


SMINPUT missing control 


If SMINPUT was card-image, check for missing cards. If 
SMINPUT was tape, error is in SM release tape. 
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# SMAPPLY -005- SMnnnnnn xxxxxxxx NOT FOUND CANNOT APPLY 


Cause: Module to which specified SM applies cannot be found. 
Possibly because the module was to be added by an 
earlier SM that was not applied, or module is part of a 
special feature not purchased by the user. 


Action: Correct error condition and run again for rejected SM or 
SMs, or ignore. 


# SMAPPLY -005- SMnnnnnn xxxxxxxx WAS FOUND CANNOT ADD 


Cause: A module that was to be added via SMnnnn was found to 
already exist on SYMSM. Possibly because the SM was 
applied twice, or the module was added by an XM or UM. 


Action: Determine why the module already was on the library. 
Correct condition and rerun job for rejected SM or SMs 
as necessary. 

SMAPPLY -006- SMnnnnnn xxxxxxxx HAS USER/XM MODS MUST FQCRCE 

APPLY 


Cause: Module xxxxxxxx was found to have user modifications or 
experimental SMs. This condition is detected only if 
UMs or XMs were applied via ASMF. The SM is not applied 
unless FORCE is specified on APPLY conmand card. 


Action: Rerun job to FORCE apply rejected SM or SMs if 
necessary, or apply rejected SM to a version of the 
module that does not contain experimental SMs. 


® SMAPPLY -007- SMnnnnnn WILL BE FORCE APPLIED 


Cause: A module, to which SMnnnn is to be applied, contains 
user or experimental SMs but FORCE was specified on 
APPLY command card. This message is always preceded by 
message SMAPPLY-006. The SM is FORCE applied. 


S SMAPPLY -008- SMnnnnnn xxxxxxxx UPDATE SUCCESSFUL 


Cause: The SM specified has been successfully applied to the 
module specified. 
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SMAPP LY 


Cause: 


Action: 


Messages and Codes 


-009- SMnnnnnn STOW ERROR FOR XM/USER MOD 


Le No space left in directory of PMI.SYMSM data set. 
2. Member name to be replaced not found on PMI.SYMSM. 
3. Permanent I/O error on PMI.SYMSM. 

4. Insufficient virtual storage. 

1. Reallocate PMI.SYMSM and increase the number of 


directory blocks, rerun the job. 


2. Determine why the member name is missing, correct 
and rerun the job. 


3. Determine cause of 1/0 error from IBM data 
management messages. 
4. Rerun job specifying larger region size. 


-010- SMnnnnnn-xxxxxxxx - MODULE NOT FOUND 


Module to be zapped by the specified SM was not found on 
PMI.MODSM, PMI.MODREL or PMI.MODLIB. 


Correct error condition and run again to apply rejected 
SM or SMs. 


-011- SMnnnnnn xxxxxxxx SUPERZAP SUCESSFUL 


Superzap SMnnnn has been successfully applied to module 
XXXXXXXK 


-012- MODULE TABLE FULL- ABORTING 
#MD too small. 


Increase #MD via PARM.INTASMF and run again. 


Module xxxxxxxx not found on DDNAME LIBUTI1. 


Correct error condition and run again for rejected SMs. 


-016- ASSEMBLY OF xxxxxxxx SUCCESSFUL 


The assembly of the specified module was successful. 
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ex 


SMAPP LY 


Cause: 


Messages and Codes 


-016- LINKEDIT OF xxxxxxxx SUCCESSFUL 


The linkedit of the specified module was successful. 


The specified SM was not found. 


SELECTed first. 


May not have been 


Correct error condition and run again for rejected SMs. 


SM nnnn: RC xx FROM mmmmmmmm MOD xxxxxxxx 


A return code of xx was received from the assembler or 
linkage editor named ommmmmmmm ffor module xxxxxxxx. 
Check the assembly or linkedit listing to determine the 
nature of the errors. 


Correct the errors or override ASMRC in the command 
input stream, then rerun the job to reapply the SM. 


-019- SMnnnn (sMnnnn Bae SMnnnn] 


Follows SMAPPLY-016: Assembly of xxxxxxxx Successful. 
Gives list of SMs that were applied to the module. 


-001- MODULE xxxxxxxx DDNAME=dddddddd NOT FOUND 
Module not found in data set specified by DDNAME. 


Correct error condition and run again for rejected SM. 


SMCOP Y 


Cause: 


-002- ERROR FROM IEBCOPY 
Errors occured during a copy operation. 


Check IEBCOPY output to determine the nature of the 
errors; correct and run again. 


-001- SMnnnnnn NOT FOUND CANNOT DELETE 
SM specified not found on SMLIB control data set. 


Correct error condition and run again. 
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SMDELET 


Cause: 


Ac tion: 


Messages and Codes 


SMnnnonnn ERROR- 
FOUND 


-002- INDEX RECORD FOR mmmmmmm NOT 


Part of SM specified cannot be found for deletion. 


If SMINPUT was card-image, check for missing or 
out-of-sequence cards. If SMINPUT was tape, error in SM 
release tape. 


SMDELET 


Cause: 


Permanent I/0 error on SMLIB or insufficient virtual 


storage. 


Check IBM data management messages to determine cause, 
or increase region size and rerun job. 


SMDELET 


Cause: 


-004- SMnnnnnn CONTROL RECORD FOR mmmmnommm NOT FOUND 


Record not found. such as two 


deletes for same SM. 


Possible user error, 


Determine cause of missing control record. 


-001- OPEN ERROR SYSIN DSN- RUN CANCELED 


SYSIN could not be execution is 


terminated. 


opened. Current 


Correct error condition and run again. 


-002- BAD INPUT PARAMETER - RUN ABORTED 


Unidentifiable parameter specified via PARM.INTASMF. 


Current execution is terminated. 


Correct error condition and run again. 


Cause: 


MAX # CONTROL 
BLKS IZ E-ABORT ING 


CARDS 


#CT too large for SMLIB blocksize. 
record size cannot exceed blocksize. 
terminated. 


#CT times logical 
Current execution 


Increase BLKSIZE or reduce #CTI appropriately and run 
again. (See execution Step 7 in Chapter 5.) 
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SMMAIN -004- INVALID OPERATION CODE— RUN ABORTED 


Cause: Unidentifiable ASMF command. Current execution 
termi nated. 


Action: Correct error condition and run again. 


SMMAIN -005- UNSUPPORTED OVERRIDE OF PARMS 


Cause: Can only override #CT, #IN, #MD, and #SM_ via 
PARM.INTASMF. Other SMPROF parameters can be overridden 
in the job stream with ASMF control commands. Current 
execution terminated. 


Action: Correct error condition and run again. 


Cause: ASMF command parameter specified was not UPDONLY, 
ASMONLY, UPDASM, FORCE, or a comment. Current execution 
termi nated. 


Action: Correct error condition and run again. 


Cause: #SM too small; too many SMs specified via commands. 
Current execution terminated. 


Action: Increase #SM via PARM.INTASMF and run again. 


SMMAIN -008- RUN TERMINATED BECAUSE OF CONTROL CARD ERRORS 


Cause: One or more syntax errors in ASMF commands. Current 
execution terminated. 


Action: Correct error condition and run again. 


SMMA IN -009- TOO MANY CONTINUATION CARDS- RUN ABORTED 


Cause: #IN too small for number of command parameters 
specified. Current execution terminated. 


Action: Increase #IN via PARM.INTASMF and run again. 


SMMAIN -010- INVALID CONTINUATION CARD - RUN ABORTED 


Cause: Syntax error in continuation of ASMF command. Current 
execution terminated. 


Action: Correct error condition and run again. 
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SMMA IN -Oll- INVALID OPERAND - RUN ABORTED 
Cause: Error in ASMF command. Current execution terminated. 


Action: Correct error condition and run again. 


Cause: #SM too small; too many SMs on ASMF control data set. 
Current execution terminated. 


Action: Increase #SM via PARM.INTASMF and run again. 


SMMA IN -013- MONTH NAME INVALID - RUN ABORTED 


Cause: Unrecognizable for-month name in SELECT or PRINTITP 
command. Current execution terminated. 


Action: Correct error condition and run again. 


Cause: Month number not between 1 and 12 or not enclosed in 
parentheses in SELECT or PRINITP' conmand. Current 
execution terminated, 


Action: Correct error condition and run again. 


SMREJECT -001- MODULE TABLE FULL- ABORTING 
Cause: #MD too small. Current execution terminated. 


Action: Increase #MD via PARM.INTASMF and run again. 


* SMREJECT -002- SMnnnnnn LOADMOD OF xxxxxxxx I/O ERROR 


Cause: 1/0 error on LNKSYSLM due to permanent data set 1/0 
error or insufficient region size. 


Action: Determine cause of permanent I/0 error from IBM data 
Management messages, correct and rerun, or rerun with 
larger region size. 


* SMREJECT -002- SMnnnnonn LOADMOD OF xxxxxxxx NOT FOUND 


Cause: Load module not found on LNKSYSLM, possibly because it 
was already rejected, or SMnnnn was never applied. 


Action: Determine cause of error. Rerun if necessary. 
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e* SMREJECT 


Messages and Codes 


-002- SMnnnnnn LOADMOD OF xxxxxxxx REJECTED 


Load module xxxxxxxx deleted from LNKSYSLM. 


-002-  SMnnnnnn SOURCE OF xxxxxxxx 1/0 ERROR 


I/O error on LIBUT2 due to permanent data set I/0 error 
or insufficient region size. 


Determine cause of permanent I/O error from IBM data 
Management messages, correct and rerun, or rerun with 
larger region size. 


Source module xxxxxxxx not found on LIBUT2, possibly 
because it was already rejected, or SMnnnnnn was never 
applied. 


Determine cause of error. Rerun if necessary. 


-002- SMnnnnnn SOURCE OF xxxxxxxx REJECTED 


Source module xxxxxxxx deleted from LIBUT2. 


-003- CONTROL RECORD FOR xxxxxxxx NOT FOUND 


Record missing from SMLIB data set. Current execution 
termi nated. 


Determine cause of error. (If SM was incorrect when 
loaded, this error should have been discovered during 
APPLY processing.) Rerun job to REJECT the SM. 


-004- SMnnnnnn xxxxxxxx UPDATE SUCCESSFUL 


SMnnnnnn has been reapplied to the specified module. It 
is reapplied because another SM to the module was 
rejected via ASMF command. 
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-005- XXXxxxxx NOT FOUND IN SMLIB CANNOT APPLY 


SM member xxxxxxxx not found in ASMF control data set. 
The SM was being reapplied because a SM was rejected via 
ASMF command. (This error should have been detected 
during APPLY processing. ) 


Same as conditions indicated under SMAPPLY-009 except 
that DDNAME is LIBUT2. 


Same as for SMAPPLY-009 except DDNAME=LIBUT2. 


Appendix E 


SMRE JECT 


Cause: 


Messages and Codes 
-007- SMnnnnnn-xxxxxxxx - MODULE NOT FOUND 


Module xxxxxxxx to which specified SM applies not found 
on either LNKSYSLM or LNKSLIB. 


Correct error condition and run again. 
ensure all non-rejected SMs are reapplied. 


Rerun job to 


-008- SMnnnn xxxxxxxx SUPERZAP SUCCESSFUL 


Successful reapplication of SMnnnn to module xxxxxxxx. 


-009- ASSEMBLY OF xxxxxxxx SUCCESSFUL 


Successful assembly after a reapplied SM. 


-009- LINKEDIT OF xxxxxxxx SUCCESSFUL 


Successful linkedit after a reapplied SM. 


SMREJE CT 
Cause: 


Ac tion: 


An SM to be reapplied was not found. 


Correct error condition and run again if necessary, to 
reapply SMs not previously rejected. The SM may not 
have been originally selected. 


-011- SM nnnn: RC xx FROM mmmmmmm 
An unsuccessful return code of xx from assembler or 
linkage editor module mmmmmmm. 


Determine the nature of the errors from linkage editor 
or assembler output. Correct the errors or override the 
ASMRC value via the control command input stream. Rerun 
the job to reapply the specified SM. 
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SMS or XMS module could not be copied by IEBCOPY. 
Current execution terminated. 


Make sure SMS or XMS module is present on LNKSLIB or 
LNKSYSLM. Check IEBCOPY output for error messages. 
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SMSTAT -002- SM NUMBER nnnn EXCEEDS CAPACITY OF SM STATUS 
TABLE- RUN CANCELED 


Cause: SMS or XMS module full and cannot be updated. Current 
run is terminated. 


Action: Scratch and reallocate the SYMSM and MODSM data sets. 
Then reassemble and link SMS or XMS module specifying 
BASE and LEVEL on SMLEVEL macro as the number of the 
last SM applied prior to the current batch. Then rerun 
the job from the beginning. 


SMS TOW -001- UNABLE TO OPEN SM PDS 


Cause: SMLIB data set could not be opened. The current run is 
terminated. 
Action: Check JCL for correct parameters. Check VTOC listing 


for data set; ensure that allocation was successful and 
DCB parameters are correct. Rerun the job. 


SMSTOW -002- CANNOT HAVE MIXED TYPES IN SAME RUN- SM, XM, OR 
UM 


Cause: ASMF commands specifying more than one type of SM were 
found in the same run, or command card and SM control 
record do not reference same SM type. Current run is 
terminated. 


Action: Execute one run for each type of SM. 


Cause: Because FORCE was specified, the SM specified has been 
processed although it is not appropriate for this 
release. 


e SMSTOW -004- SMnnnn DOES NOT APPLY TO REL xxxx - EXCLUDED 


Cause: The SM specified has not been processed because it is 
not appropriate for this release. 


Cause: Self-explanatory. Current run is terminated. 


Action: Respecify SM numbers and control records in numerical 
sequence. 
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SMSTOW -006- ccc CARD AFTER MOD CARD ABORTING RUN } 
Cause: Error in SM control records in SMINPUT. 


Action: If SMINPUT was card-image, check for an out-of-sequence 
card. If SMINPUT was tape, error in SM release tape. 


esenwewesreerFerF2827 8728 2 87 2 e2 weeeenwzeweewkwzeereeaeeeaewzeereewrzeweeweweereweewzeewereeereereeeeeweeeweweeeweeeweeweeweewwaeewereeee = 


SMSTOW -007- 5M CONTROL CARD WORK TABLE FULL - ABORTING 


Cause: SMLIB blocksize too small. Current run is terminated. 
Blocksize must be greater than or equal to #CT times 
logical record length. 


Action: Reallocate SMLIB specifying larger blocksize and rerun, 
(see Chapter 5). 


SMSTOW -008- ccc INVALID ++ OPERATION - IGNORED 
Cause: Unrecognizable SM control record in SMINPUT. 


Action: If SMINPUT was card-image, check for mispunched card, 
correct error and rerun job. If SMINPUT was tape, error 
in SM release tape. 


SMSTOW -009- BLDL- PERM I/O ERROR IN SOURCE LIBRARY 


Cause: Permanent I/O error on LIBUT1, or insufficient virtual 
storage. Current run is terminated. 


ction: Check IBM data management messages to determine cause of | 
error. Also, check JCL and VTOC listing to ensure 
allocation specifications are correct, or rerun job with 
larger region size. 


SMSTOW -010- SMnnnn-xxxxxxxx NOT FOUND IN LIBRARY 
Cause: Module not found on LIBUT1. Possibly the module was 


added via an earlier SM that was not applied, or is part 
of a special feature not purchased by the user. 


Action: Determine cause of missing module. Rerun the job to 
reapply the SM if necessary. 


Cause: #MD too small. Current run is terminated. 


Action: Increase #MD via PARM.INTASMF and run again. 
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* SMSTOW -012- XxXxxxxx CONTAINS USER MODS MUST FORCE APPLY 
SMnnnn 


Cause: Module xxxxxxxx contains user SMs. The SM will not be 
applied. If desired, rerun the job specifying FORCE on 
ASMF command card to apply this SM. 
* SMSTOW -012- XXXxXxxxx CONTAINS EXP MODS MUST FORCE APPLY 
SMnnnn 


Cause: Module xxxxxxxx contains experimental SMs. The SM will 
not be applied. 


Action: If desired, rerun the job specifying FORCE on ASMF 
command card to apply this SM. 


SMSTOW -013- BLDL- PERM I/O ERROR ON SMLIB 


Cause: I/O error on SMLIB, or insufficient virtual storage. 
Current run is terminated. 


Action: Examine IBM data management messages to determine the 
nature of the I/O error. Also check JCL and VTOC 
listing to ensure valid parameter, or rerun job with 
larger region size. 


SMSTOW -014- SM LIBRARY DIRECTORY FULL 


Cause: SMLIB out of directory’ blocks. Current run is 
termi nated. 


Action: Reallocate SMLIB, with a larger number of directory 
blocks. Rerun the job. 


SMSTOW -O15- STOW- PERM I/O ERROR 


Cause: Permanent I/O error on data set SMLIB. Current run is 
termi nated. 


Action: Check IBM data management messages to determine cause of 
error. Also check JCL and VTOC listing and ensure all 
specifications are correct. 


SMSTOW -016- #COULD NOT OPEN TO READ TAPE LABEL 


Cause: Open on SMINPUT failed. Current run is terminated. 


Action: Check JCL on SMINPUT DD statement; verify parameters are 
correct. 
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SMSTOW 


Cause: 


Action: 


SPR 198 8/81 Messages and Codes 


-017- INVALID TAPE LABEL 


Current run is terminated via ABEND 
The SM release tape is bad. 


Self-explanatory. 
Ccc=001. 


A new copy should be obtained. 


-018- DSNAME MONTH NE CNTRL CARD MONTH, USE CARD 


Month specified on SMINPUT dsname not the same as 
specified on ASM® command card. Current run continues. 


ASM makes required adjustments. 


-019- CODED MONTH NE TAPE LABEL MONTH, USE LABEL 

Month specified on SMINPUT tape label not the same as 
specified on ASMP command card. Current run continues. 
ASMF takes the month from the SM release tape label. 


-020- SYSTEM MODIFICATION 


DIRECTORY, IGNORED 


XXXXXXXX ALREADY IN 


Self-explanatory. 
twice. 


Possibly, the same SM was applied 


Determine why the member was already in the library. 
Printing the contents of the member may aid diagnosis of 
the problem, 


-021- SM nnnn ALREADY SELECTED - IGNORED 
Self-explanatory. Possibly, a duplicate SELECT card for 
the same SM was specified. 


Determine why the member was already in the library (SM 
already applied). Printing the contents of the member 
may aid diagnosis of the problem. If SM selected is not 
identical to one which already exists, use DELETE and 
SELECT to replace the existing one with the new one. 
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SPR 223 1/84 


Appendix F 


CROSS-REFERENCE PROGRAMS 


This appendix documents the Intercomm cross-reference modules, as 


follows: 


IAIMCOCR 


IAIMGOCR 


IAIMGOC2 


IAIMMOCR 


TAIMMRF 1 


IAIMMRF 2 


TAIMOPCD 


LAIMXRF 1 


Scans a library for COPY statements and prints a 
sorted cross-reference listing by COPY member 
name, showing modules which copy that member into 
those modules. 


Accepts only eighty-character source code as input 
and produces (as input for a sort) a data set 
containing a list of global symbols with names of 
modules referring to them, and indicating at what 
sequence number in the module (macro) the reference 
is made. 


Prints a global symbol cross-reference listing 
after the output from IAIMGOCR has been sorted. 


Scans a library for modules that refer to specific 
or all macros and produces aé_=e sorted _ cross- 
reference listing giving names of all modules 
referring to them. 


Lists one or more macros, or an entire macro 
library with a cross-reference list of macro 
sequence symbols and _  globals following’ each 
macro. Input is eighty-character source code. 


Produces a cross-reference list of macro sequence 
symbols and globals from an input of 121l-character 
(Assembly print output) records. 


Scans a source library and produces a_ sorted 
directory listing, followed by a sorted, detailed 
"op-code' occurrence cross-reference listing. 


Scans load modules and analyzes them for internal 
CSECT size, external references and entry points. 
Output is then sorted (in separate steps) and 
passed to IAIMXRF2 for printing. 
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e IAIMXRF2 - Prints an ordered core usage list, followed by a i 
list of external references and entry points with J 
CSECTs and members containing them. This informa- 
tion is produced by IAIMXRF1 and sorted by SORT 
before being passed to this program for printing. 


F.2 IAIMCOCR--Copy Member Occurrences 


This program generates an alphabetic list of all copy members that 
are referenced and the modules that reference them. The input data set 
(SYSUT1) is a card-image, Assembler Language source library. The copy 
members themselves need not appear in the input library. 


Sample JCL: 


//TAIMCOCR JOB 

//STEP1 EXEC PGM=IAIMCOCR, REGION=100K 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR Program Load Library 
//SYSPRINT DD SYSOUT=A,DCB=BLKSIZE=1210 Message Data Set 
//SYSUT1 DD DSN=INT.SYMREL,DISP=SHR Input Library to Cross 
//* Reference 

//SYSUT2 DD SYSOUT=A Output Cross Reference 


//SORTLIB DSN=SYS1.SORTLIB, DISP=SHR OS Sort Routines 

//SORTIN UNIT=SYSDA, SPACE=(TRK, (10,10) ) Temp Output & Sort Input 
//SORTWKO1 UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) Sort 

/ /SORTWKO2 UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) Work 

//SORTWKO3 UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) Areas 

//SYSOUT SYSOUT=A | SORTs System Messages 
//SORTOUT UNIT=SYSDA, SPACE=(TRK, (10,10) ) Sorted List to be formatted 


Sample output is shown on the following page. 


NOTE : A list of COPY statements alphabetized by module name may 
be obtained via the IAIMOPCD program. 
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GS? 


MEMBER 
SLUCCALL 


$LUCSB 

ACCTYPES 
ALTREPRT 
ASMLOGCH 
ASYODSECT 
BROOSECT 


BT AMWORK 


RTMOSECT 
CHKPTOST 
DOQE KV 

NOQSECTS 
DOSASECT 


DE VLISTC 


DEVSETNG 


OE VTABL 


OTALTABL 


OLIe 

DSEDSECT 
DYNDSECT 
EDITPRM#C 


FNQOSECT 


COPIEO BY 


LC OMP 
LCOMP 
MAFACCT 
PALIOUTPT 
MPGGEN 
ASYNCLDR 
BR CADRIN 


BOLAL 
GENVERB 


FE™SG 
CHECKPTS 
o0OGMOD 
nbpGaMOD 
IXFHNDO1 
INTBETATI 
MMUSTART 
TALLY 


DEFINE 
STATION 


BD TAL 
PTAMSTAT 
FEPSG 
PMI7T779S 


BC TAL 
TPUMSG 


CHCKPTSS 
MRINTER 
NYALLOAD 
EDITOV00 


MRINTER 


LUNIT 
VTCSB 


SAMSECT 


WORKS HPM 
CLOSDUN3 
FESEND 


BLHIN 
GRAPHICS 


TPUMSG 
RESTORE 5 
NDASTART 


DDQSTART 


INTSECOO 
OuUTS270 


DEVICE 


BLHIN 
BISEARCH 
GFEINTFC 
RJESENDO 


BSCOIAL 


CPLUNCSS 


TCOMDYNL 


ENITU0l 


MRPURGE 


TRACK 


LOAODOVLY 


BLHOT 
PMIWILT 


INTSEC 0? 
PMIOVASN 


ISGEN 


BLHOT 
ATVERIFY 
GRAPHICS 
SIMTTY 


BSTAT2 


DBCHKDOSP 


LOADSCT 


EDTTAR2 


COPY OCCURRENCE CROSS-REFERENCE LISTING 


PMIOLOAO 


BSCOTAL 
PMI2741 


ISGEN 
PMIEXTRM 


LOADMAP 


BMHOOO 
BUNKRAMO 
INTSECO2 
TALLY 


BTAML INE 


KE YFLIP 


PMIPLI 


FOITOOS 


STARTUFS 


BSCLEASE 
PMI3735S 


MAPIN 
PMIOUTPT 


LPSPA 


BSCDIAL 
CNTO1IMON 
OoUuTOS49D 
TC AMINTE 


ATAMSIM 


STARTUF? 


EN Tons 


SYCT400 


RTSEARCH 
PMIT7770S 


MAPOUT 
PMIR JE 


MAPGROUP 


BSCLEASE 
COPYSS 
OUT3270 
TPUMSG 


BTAMSTAT 


TOUMP 


ENITOOR 


BUNKR AMO 
SIMTTY 


MMUDDM 
R JEROUT 


MAPOUT 


BSTAT2 
ERRSTATS 
PMIEXTR# 
USRECRY 


FECMD 


ENITNO9 


CNTO1MOD 


MAUDDMT 
RJESEND 


MMUSTART 


RT AML INE 
ERRSTASG 
PMIWILT 


PMI2741 


PMIEDIT 


Cc 


B/05/81 


ERRSTMSG 


MMUDDMU 
SIMCRTA 


MMUVT 


BTAMSIM 
FECMD 
PMTI2TA 


PMI3735S 


PAGE 


1 


a xtpueddy 


tcc dS 


98/1 
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F.3 IAIMGOCR and IAIMGOC2--Global Occurrences ) 


These programs generate an alphabetical list of all global symbols 
that are referenced, the modules that reference them and the sequence 
numbers of the statements at which they are referenced. The input data 
set (SYSLIB) is a card image, Assembler Language source library. 


Sample JCL: 


//TAIMGOCR . ++, REGION=512K 

//STEP1 PGM=IAIMGOCR 

//STEPLIB DSN=INT .MODREL , DISP=SHR Program Load Library 

//SYSLIB DSN=INT.SYMREL , DISP=SHR Input Library to 

//* Cross Reference 

//SYSPRINT SYSOUT=A Message Data Set 

| //SYSOUT SYSOUT=A 

/ / GLOBAL DSN=&&STGOCR, DISP=(NEW, PASS), Cross Reference to 
DCB=BLKSIZE=1210,UNIT=SYSDA, be sorted 
SPACE=(TRK, (20, 20)) 

//STEP2 PGM=SORT 

//SORTLIB DSN=SYS1.SORTLIB, DISP=SHR OS Sort Routines 

//SORTIN DSN=&&STGOCR, DISP=(OLD , DELETE) Sort Input 

/ /SORTWKOL UNIT=SYSDA, SPACE=(CYL,(10),,CONTIG) Sort 

/ /SORTWKO2 UNIT=SYSDA, SPACE=(CYL,(10),,CONTIG) Work 

/ /SORTWKO3 UNIT=SYSDA, SPACE=(CYL,(10),,CONTIG) Areas 

//SYSOUT SYSOUT=A Sort System Messages 

//SORTOUT DSN=&&STGOC2, DISP=(NEW, PASS), Sort Output 
SPACE=(TRK, (20, 20) ,DCB=(RECFM=FBA, 
LRECL=121, BLKSIZE=121) , UNIT=SYSDA 

//SYSIN DD * Sort Control Fields 

SORT FIELDS=(2,9,A,11,8,A,21,8,A) , FORMAT=CH 

/* 

//STEP3 EXEC PGM=IAIMGOC2 Print Program 

//STEPLIB DSN=INT.MODREL, DISP=SHR Program Load Library 

//SYSUT1 DSN=&&STGOC2, DISP=(OLD, PASS) Input From Sort 

//SYSUT2 DD SYSOUT=A, DCB=BLKS IZE=1210 Output Cross Reference 

//SYSPRINT DD SYSOUT=A Message Data Set 


Sample output is shown on the following page. 
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LY 


C 


SYMBOL 
&3$B 


&sBC 


&SCSBGEN 
escrc 
SsCTINIT 
&sCIN 
&SCVUGEN 
&SLVBCGEN 
&SNODEF 


&sTCLASS 


&sTCONE 


atv 


GacT 
SHIN 
&anDd 
ease 
SaAREA 
A 


MEMBER 
$SLUCSB@ 
SLUCYN 
LCOMP 
VICSB 
$LUCSB 
SLUCYN 
LCOMP 
VICSE 
VTLSB 
SLUCLASS 
SLUCLASS 
SLUCLASS 
VTCSB 
VILSB 
S$LUCSB 
SLUCYN 
LCOMP 
VTICSE 
SLUCLASS 
ICOML INK 
VTICSS 
vtcve 
VTLSA 
VTLSB 
SLUCLASS 
ITCOML INK 
VICSB 
VTCVve 
VILSOS 
SLUCCY 
LCOMP 
VICSE 
SMPRCF 
SMPRCF 
SMPRCF 
SMPRCF 
VILUCM2 
BER 

BHE 

BHER 

BHR 

BLE 

BLER 

BLR 

BMR 

BNER 

FE NHR 
ANLR 
BNMR 
ANOR 
BNPR 
BNZR 

HOR 

1pR 


REFERENCES 


00110000 
00014000 
002600C0 
00220000 
60120000 
00014000 
00260000 
00220000 
00240000 
00190000 
00200000 
0037A0000 
00200000 
00220000 
n0230000 
00015000 
00270000 
00230000 
00170000 
n0048100 
00210000 
00200000 
00230600 
02153000 
00170000 
00048100 
00210000 
00200000 
00230000 
00140000 
00260000 
00220000 
00040000 
10030600 
00060000 
00050000 
00900000 
0009002000 
00002000 
00002000 
00002000 
00002000 
00002060 
00002000 
00002000 
90002000 
00002000 
00002060 
000620C0 
00902000 
00002000 
n0002000 
vn002C00 
han02000 


00240000 
00050000 
01156000 


00220000 
00018000 
01160000 


00620000 
00270000 
00250000 
00266000 
00530600 
00651500 


00019000 
01030000 
00680000 
00340000 
00324063 
00310000 
00310000 
009310000 


00460000 


00620000 


00562000 
00160000 


00770400 
00370000 
00360000 
06390000 
00580000 
01160000 
00003008 
00003000 
000035000 
06003000 
00005000 
00003000 
90003000 
00003000 
000035000 
00003000 
G0005000 
00003000 
00nf3000 
00003000 
00003000 
00g00n3060 
00003000 


GLOBAL 


00240000 
00030000 
01190000 


00220000 
000148000 
01160000 


00640000 
00290000 
00320000 
00280000 
00550000 
00652500 


01170000 
00450000 
00324090 
00380000 


00320000 
00350000 


00615000 
00200000 


00770600 


01170000 


( 


OCCURRENCE CROSS-REFERENCE 


00280000 


01190000 


00310000 
00023000 


00310000 


00300000 


00460000 
00324210 
00431100 
00340000 
00560300 


01770000 
00230000 


00790000 


01290000 


00280000 
01200000 


00310000 
00023000 


00311000 


00310500 


005350000 
00400000 
00615000 


00280000 


00790000 


01310000 


00300000 


00490000 


00312000 


00311500 


00540000 
00441000 
00651500 


00310000 


00800000 


LISTING 


00300000 


00490000 


00390000 


00370000 


005500900 


00652000 


00800000 


8/05/81 


00430000 004350000 00440000 


00500000 


00450000 00460000 


00620000 


00652000 00652500 01770000 
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Appendix F SPR 223 1/84 Cross Reference Programs 


F.4 LAIMMOCR=--Macro Occurrences 


This program produces an alphabetical list of all referenced 
macros and the modules that reference them. The input data set (SYSUT1) 
is a card-image, Assembler Language source library. 


The names of the macros to cross-reference are described on 
control cards in the SYSIN data set. There are three types of control 
cards: INCLUDE, INCLUDE ONLY and EXCLUDE. These control words can 
appear anywhere before column 72 and are followed by a list of macro 
names, separated by commas. If all macro names cannot fit on one 
control card, the card should end with a comma before column 72 and can 
be continued beginning in any column on as many continuation cards as 
needed. If the SYSIN data set is empty, all member names of the SYSLIB 
data set will be used as macro names to cross-reference. The function 
of each control card is as follows: 


® INCLUDE ONLY 


The cross-reference produced will only be for the macros that 
appear on this card. 


@ INCLUDE 


All member names in the SYSLIB data set as well as any names 
on this card will be used as macro names to cross-reference. 
This might be used when you want to scan for certain OS 
Macros, as well as all Intercomm macros. 


e EXCLUDE 


All member names of the SYSLIB data set will be used as macro 
names except for those listed on this control card. 


The INCLUDE and EXCLUDE control cards may both be used during a 
run of the program. The INCLUDE card would specify additional macro 
names to those in the SYSLIB data set while the EXCLUDE card would limit 
the scan by deleting from the cross-reference specified macro names that 
appeared in the data set. For example, you may want to exclude some 
Intercomm macros, while including some OS macros. 


To obtain a cross-reference of all OS/VS macros, as well as 
Intercomm macros, concatenate SYS1.MACLIB (and SYS1.AMODGEN if MVS) to 
the SYSLIB data set. 
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Appendix F 


Sample JCL: 


//LAIMMOCR JOB 


SPR 223 1/84 


//STEP1 EXEC PGM=IAIMMOCR, REGION=128K 


//STEPLIB DD 
//SYSIN DD 


DSN=INT.MODREL, DISP=SHR 
* 


INCLUDE ATTACH, CALL, LINK, XCTL 


/* 

//SYSLIB 
//SYSUT1 
//SYSUT2 


DSN=INT.SYMREL, DISP=SHR 
DSN=INT.SYMREL, DISP=SHR 
SYSOUT=A ,, DCB=BLKS IZE=1210 


Cross Reference Programs 


Program Load Library 
Control Cards 


Macro Names Library 
Input Library to XREF 
Output Cross Reference 


//SORTLIB DD DSN=SYS1.SORTLIB,DISP=SHR OS Sort Routines 

//SORTIN DD  UNIT=SYSDA,SPACE=(CYL,(1,1)) Sort Input 

//SORTOUT DD UNIT=SYSDA,SPACE=(TRK,(10,10)) Sort List to be formatted 
//SORTWKO1 DD UNIT=SYSDA,SPACE=(CYL,(3),,CONTIG) Sort 

//SORTWKO2 DD UNIT=SYSDA,SPACE=(CYL,(3),,CONTIG) Work 

//SORTWKO3 DD UNIT=SYSDA,SPACE=(CYL,(3),,CONTIG) Areas 

//SYSOUT DD SYSOUT=A Sort System Messages 


Sample output is shown on the following page. 
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OS 


MACRO NAME 
SLUCCV 
$SLUCLASS 
SLUCYN 
AIDDATA 
ATOGRP 
ATTACH 


ATTRIB 
BDEVICE 
BER 

RE TAMOD 
BHR 
BLINE 
BLOCKAD 
BLOCKAW 
BLOCKBD 
BLOCK BW 
BLOCKCD 
BLOCKCW 
BLR 
BNER 
BNHR 
BNLR 
BNOR 
BNPR 
RANZR 
BOR 


BTERM 
BTERR 
BILCEX 
BTASG 
BISPA 


BT VERB 
BVBASE 
PZR 


CALL 


REFERENCED BY 


VTCSB 
ICOMLINK 
SLUCSB 
RTS&MP 
BISAMP 
ABTOTEND 
RJESTART 
LOGCHARS 
HTSAMP 
RLUSTRC 
INTBETAT 
BISEARCH 
RTSAMP 
CQBOLGN 
COBOLGNA 
COEBOLGN 
COBOLGN 
COBOLGN 
COBOLGN 
LOGANAL 
BLKIN 
BLER 
BHER 
IXFHNDOI\ 
EXMVE 
AMHOOO 
BTSEARCH 
VTEXTITS 
BTSAMP 
BLHIN 
LOGPROC 
FEMSG 
BOTAL 
BSTAT2 
ERRSTMSG 
PMIWILT 
TCAMINTFE 
ATSAMP 
FECMD 

BO IAL 
MAPIN 
VTSQRS YN 
ABTOTE ND 
BROADRTN 
BUNKRAMO 
CNTO1IMOD 
DDQSTART 
FINTUNER 
INTOPLOK 
TRANGE 
IXFHNDOI 
LOADPACE 


VTCSB 
LCCMP 


ATTOTRS 
STARTUPS 


BIVRBTB 
BSCLE ASE 


FECMD 
BTIVRBTB 


MRINTER 
FEC™D 
BSCLEASE 
FECMO 


FECMD 
DYNLLOAD 
VTLUCMD 
BIVRBTB 
BLHOT 
LOGPUT 
TPUMSG 
BLHIN 
BTAML INE 
FECMD 
PMI? 741 
TPUMSG 
BTVRETB 
FEMSG 
BLHIN 
MRCSAMOD 
WTOMOD 
ASYNCLDR 
BSCOTAL 
CALCRBN 
COBFUT 
DISPLAY 
FORMGEN 
INTDEXTR 
ISGEN 
IXFLOG 
LAAOSCT 


MACRO OCCURRENCE CROSS-REFERENCE LISTING 


VICVB 


BTAMLINE 
STOSTART 


FEINSTOK 
FECMD 


VTRECVE 
FEINSTOK 


IXFHNDO1 
FECMD 


LOGANAL 
IGCICOM 
VTQMOD 

FE INSTNK 
BSCDIAL 
MRIDAXS 


BLHOT 
BT AMSIM 
FOCMSG 
PMI3735S 
USRECRY 
FEINSTOK 


BLHSTRC 
PMIEXTR™ 


ATTOATRS 
BSCLEASE 
CALLIF 
CONVERSF 
DYNLLOAN 
GETSEE 
INTPRO 
ISGOUT 
IXFOPRO) 
LOGANAL 


VTLSB 


DYNLINK 
TCAMASYN 


IXFHNDO1 


LOGANAL 
IXFFAR 


SYCT400 
IXFHNDOI 
VTRECVE 


BSCLEASE 


BLHSTRC 

BIAMSTAT 
GFEINTFC 
PMI7770S 
USRER 129 


BSCLE ASE 
TALLY 


BOY AL 
BSEGMOD 
CFMSINTE 
COP YSS 
ECHOMSG 
GFE INTEC 
INTSECNO 
1 XFCHKPT 
IXFRPTO1 
LOGHIST 


c 


ICOMDYNL 
TOTSTART 


MAPIN 


MAPIN 
TPUMSG 


VTICDM2 
LOGAWAL 
VTSEND 


BTSEARCH 


BL MSGCOL 
BISEARCH 
GRAPHICS 
QUEUENOD 


FE CMD 
VT COM2 


BLEIN 
GSTAT? 
CFMSMAC1 
CPLUNICSS 
EPITOOE 
GPSS 
INTSFEC2 
IXFCPEAT 
IXFRVRSE 
LOCINPUT 


ICOMTASK 


PDATBASE 


VT@MNOD 


VTILUCMD 
MAPIN 


PMI2741 


BMHOOO 
RIVERIFY 
LOGPUT 
RF QONDDQ 


FEMSG 
VTEXITS 


ALHOT 
PTAMLINE 
CHANGE 
DBADACHK 
FDPSEND 
GRAPHICS 
INTSTORF 
IXFCTRL 
IXFSNAPL 
LOGPRINT 


IJK TLOOP 


VTEXITS 


VTQMOD 
MRCSAMOD 


PMI3735S 


BSCOTAL 
RBUNKRAMO 
MRMOD 
SIMTTY 


INTSECO? 
VTLUCMD 


BLHSTRC 
ATAMSIM 
CHCKPTSS 
DBRSTRT 
FECMO 

TI JKPRINT 
INTSTROB 
IXFOISAM 
IXFVERF 1 
LOGPRAC 


MRINTER 


VTRECVE 


VTRECVE 
SvcT4o00 


PMI7770S 


BSCLE ASE 
CNT01M0D 
PMIEXTRM 
SSPOLL 


IXFHNDO) 
VTRECVE 


ALMSGCOL 
RTSE ARCH 
CHECKPT3 
ADGINTFC 
FEMSS 
INTRETAI 
INTSTS 
IXFFAR 
LHTRACE 
LaGceut 


A/05/8) 


PMISNAP}1 


TALLY 


TPUMSG 


BSEGMOD 
cOPyYsSsS 
PMIRFE TRY 
TALLY 


LOGPROC 
VTSEND 


RMHOOO 
BTVERIFY 
CLOSDUNS 
D00QMOD 
FESEND 
INTCRO 
INTVL 
IyFbNONO 
LOADMAP 
LOGRISP 
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Appendix F SPR 223 1/84 Cross Reference Programs 


F.5 LAIMMRF1--Global and Sequence Symbol References (Card-image Input) 


This program prints out an Assembler Language source program or 
macro, followed by an ordered cross-reference listing of all global 
symbols (&XXX) and sequence symbols (.XXX). The input (SYSLIB) is a 
card image, Assembler Language sequential or partitioned data set. When 
a partitioned data set is used as input, the program produces a cross- 
reference of each member in the data set that has MACRO as the op-code 
on the first card. To specify specific members of a PDS to be cross- 
referenced, rather than the entire data set, code the PARM parameter on 
the EXEC statement. The PARM parameter should be set to a list of 
member names to be cross-referenced, with a comma separating each name. 


Sample JCL: 


//LAIMMRF 1 


PGM=IAIMMRF | , REGION=100K 
[,PARM='BTERM, STATION’ ] optional 
//STEPLIB DSN=INT .MODREL , DISP=SHR Program Load Library 


//SYSLIB DSN=INT.SYMREL, DISP=SHR Input Library 
//SYSPRINT SYSOUT=A Message Data Set 
//SYSOUT SYSOUT=A,DCB=BLKSIZE=1210 Output Cross Reference 


Sample output is shown in the following two pages. 
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SOURCE STATEMENT PMISNAP PAGE 
MACRO fo000d100 

BNAME PMISNAP &8OCB=q¢RTCB=e8ID=e8SDATAZ=, &POATA=H— S8STORAGE=,8LIST=Hy #10000290 
SFASTINN, TO REQUEST A FAST SNAP SKxX°0000219 

SZ INDUMP=ANIN, INDICATIVE OuMP DEK #900000215 

ESPA=eSSPAF XT =e RR*#G0000220 

rvES 70000300 

LCLB RCA) FLAG BYTE SK 900004C0 

LeLc 8 20C DCB SK 909000500 

&NC SETC *&0DCB® INITIALIZE DCH PARAPETER SK 00000600 
ATF (°8DCB® NE **)-DCBOK If CCB SPECIFIED OR OFK 20000700 

ATF eermecyp® EQ © E*) .DCROK IF MFZ(EeXXX%) THEN SKIP. OFK 1000075N 

&oc SETC tre? DEFAULT OCB IS TO BE USED. OFK 00009800 
eDCBOK ANQP SK 90000900 
RN ARE SNAP DCB="0C eTCR=8TCBeID=81D eSDA TASER SDATAGPDATA=EPDATA,g SK xn0G01100 
STORAGE =RSTORAGE oLIST=ELIST e MF= RMF n0001200 

AIF C°RMFe FO ®*L@)eMEYIT 09001300 

ORG &-2 DELETE SNAP SVC INSTRUCTION. SK 01901305 

AIF CULSPAEXT® EQ &°) NEXT2 RB 90901310 

L 15S eSEXISNAP-SPAEXTC&SPAEXT) «© GET ICOMSNAP ENTRY. SK 00001320 

AGO eBALR2 RB 10001330 

eNEXT2 AIF ("SSPA® FQ *8)NSPAD PR 190001340 
L 15eSPAEXTAD=SPALISTC&SPA) «GET SPA=FXTENSTON RB 10001350 

L ISeSEXISNAP=SPAEXT(15) « GET ICOMSNAP ENTRY. SK 00001360 

AGO eBALR2 RB 00001370 

eNSPA2 ANOP RB 0001380 
L 15e=VCICOMSNAP) . GET ICOMSNAP ENTRY FOINT. se nn0014900 

eBALR2 ANOP RB 90001420 
BALR 14915 e F0 TO INTERCOMM SNAP RELTINE s® 70001500 

oc YCESNESYSNDXe-#*#) « LENGTH OF INTERCOMM PARAMETERS SK 00001510 

&B¢1) SETB CP®EFAST® EA *YES*) SET FAST-SNAP FLAG SK 10001520 
&BC2) SETB CP*EINDUMP® EQ FYES®) OMK 00901522 
OC B*SBCLISBC2IEBCIISACSIEBCSPEB(EIEBC TIRBCRD® FLAGS SK 00001530 

OC Bro? . RESERVED SK 00001540 
ESN&SYSNDX OS OH e Sk 0001550 
eMEXIT MENO Sk 10001700 
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SYMBOL REFERENCES PMISNAP PAGE 
*BALR2 15 19 22 

- DCBOK 6 7 9 
oMEXTT 11 30 

oNEXT2 13. «16 

eNSPA2 16 20 

£5 3 25 2 27 #2°27 +27 +27 2 27 + 27~ 27 
BOC 4 5 @ 10 
&DCB 2 5 6 
“FAST 2 af 

1D > 49 

*, LNDUMP 2 26 

ALIST 2 10 

SMF ) 7 10 11 
NAME 2 10 

LPDATA 2 19 

SSDATA 2? 10 

RSPA 2 16 17 
&SSPAEXT 2 13 14 
RSTORAGE 2 10 

&£SYSNDX 24 2a 

&TCR 2 10 
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F.6 IAIMMRF2--Global and Sequence Symbol References 
(121-column Assembler listing input) 


This program produces an ordered cross-reference listing of all 
global symbols (&XXX) and sequence symbols (.XXX) of an Assembler 
Language program or macro. The input (SYSLIB) is a 121-column Assembler- 
listing sequential or partitioned data set. The input library is not 
supplied to the user; if one has not been created, the uses described 
below for permanent data sets are not applicable. However, the program 
may still be used as an Assembler postprocessor for temporary data set 
input (see below). 


With permanent data set input, the program produces a cross- 
reference of each member of the input partitioned data set. To produce 
cross-references for specific members of a PDS, code the PARM parameter 
on the EXEC card for IAIMMRF2 with the list of desired members, 
separated by commas. 


Sample JCL: 


//TAIMMRF2 JOB ...,REGION=512K USE WITH PERMANENT DATA SET INPUT 
//* 

//STEP1 EXEC PGM=IAIMMRF2, PARM='BTERM' 

//STEPLIB DD DSN=INI.MODREL,DISP=SHR Program Load Library 


//SYSPRINT DD SYSOUT=A Message Data Set 
//SYSOUT DD SYSOUT=A,DCB=BLKSIZE=1210 Cross Reference Output 
//SYSLIB DD DSN=INT.ASMREL,DISP=SHR Input Assembler Listing 


//* 


Only the cross-reference is produced on the SYSOUT data set. If 
the SYSOUT data set is to include the Assembler output as well as the 
cross-reference, in any of the cases above, prefix the PARM parameter 
with the constant PRINT/, that is, code PARM='PRINT/BTERM’. 
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With temporary data set input, the program functions as a spot 
assembler when it is run immediately after an assembly with the 
Assembler SYSPRINT output spooled to a temporary system data set. If 
the temporary data set is a PDS, the PARM field on the EXEC statement 
for IAIMMRF2 should specify the desired PDS member name. With sequen- 
tial data set input, do not code the PARM field. The output produced 
will have the symbol cross-reference listing appended to each Assembler 
listing. 


For the program to function as a postassembly processor, appending 


the symbol cross-reference listing to the Assembler output, the 
following must be done: 


@ specify a single module name in the PARM field 
® specify DISP=OLD on the input data set (SYSLIB) 


e specify the last member written to SYSLIB as the module name. 


Sample JCL: 


//TAIMMRF2 JOB ...,REGION=512K USE AS AN ASSEMBLER POSTPROCESSOR 
//* 

//STEP1 EXEC ASMPC,Q=REL,NAME=BTERM Assembly Step 
//ASM.SYSPRINT DD DSN=&&TEMP(BTERM),UNIT=SYSDA, 

// SPACE=(CYL,(2,2,1),RLSE), Temporary Assembler 

// DISP=(,PASS) Listing Library 

//* 


//STEP2 EXEC PGM=IAIMMRF2, PARM='BTERM' 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR Program Load Library 
//SYSPRINT DD SYSOUT=A Message Data Set 
//SYSOUT DD SYSOUT=A , DCB=BLKSIZE=1210 Cross Reference Output 
//SYSLIB DD DSN=&&TEMP ,DISP=(OLD,DELETE) Input Assembler Listing 
//* Library 


Sample symbol cross-reference output is shown on the following 
page. 
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SYMBOL REFERENCES BTERM PAGE 


eADPLS 445 450 
eAOPLS1 397 476 
eADPLS2 434 478 
eALT1 $10 317 
eAUTUP 184% 468 
eAUTLPI 185 471 
«BAD TFUP 8° 539 
eBSCLST 771 289 
ePSCNOID 111 £47 
eB8SOCALL 232 234 
eBSDERR2 99 100 120 122 127 #+%130 552 
eBSDFONE 129 132 
ePSDIO 332 338 
eBSDIGIT 353 357 
eBSOMISS 116 548A 


eBSDSW 223 226 

eBTRTDOIL 171 430 

eBTRT1 377 3€@l 

eBTRT2 330 380 398 401 421 428 436 448 463 
eBTRT2A 401 405 

eBTRTS 404 454 

BTRT4 405 457 

eSTRTS 496 458 460 

eBTRTSA 408 467 474 

eBTRT6 910 

eBTSKP 95 136 137 138 139 #140 142 520 522 


eBTSKP11 158 165 
eBTSKP12 164 167 
eCKPSOIC 126 130 
eCKGBLIO 98 111 
eCKRCVD 16 110 116 
eCNT1050 382 461 


eCONV 4506 464 
eCONV2 465 

o CRT 405 458 
e CTL 403 451 


eCTLBYTE %63 365 
eCTLERR 451 523 
eDITLEN 246 248 
eDILERR1 A&G 525 
eDILERP2 87 P9 93 S27 
eDILERRS 88 529 
eDOTLERRE 91 531 
eOILNO1O 277 280 
eDILNO27? 281 285 
eOUMMY1 407 472 
e END 416 556 
eENOWILT 392 328 339 £360 
eERRORI 241 533 
eLRROR2 307 535 
oF RRORS 303 537 


eERRI B1 169 518 
eCRR? 141 SAS 520 
eF INLOC PAF 259 
eGBLI9 1n2 106 
eGENFONE 348 351 
eSENGR 3AR 417 


eGENGR2 391 419 
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F./7 LAIMOPCD--Op-Code Occurrences 


This program produces an ordered source library directory listing 
and a detailed sorted operation code occurrence cross-reference listing 
including: 


e Operation code or macro name 
e Member name 


@ Concatenation number within SYSLIB (which may be a concatena- 


tion of several data sets) of the data set in which the 
operation code was found 


e Complete source statements for each occurrence of the 
op-code/macro 


Operation codes cross-referenced by this program are all macro 
names (plus COPY) found in the SYSOPLIB data set(s) directory which are 
also found on the SYSLIB data set(s) and specific operation codes (macro 
names) requested via SYSIN control cards. SYSIN control cards consist 
of op-codes separated by commas or blanks. 


Op-codes SSK and ISK, for example, should be specified via SYSIN. 
If the SYSOPLIB DD is DUMMYed, output will consist only of those op-codes 
(macros) requested via SYSIN. 


Sample JCL: 


//IAIMOPCD JOB 

//STEP1 EXEC PGM=IAIMOPCD 

//STEPLIB DSN=INT .MODREL , DISP=SHR Program Load Library 
//SYSPRINT SYSOUT=A Opcode Occurence Listing 
//SYSLIB DD DSN=INT.SYMREL,DISP=SHR Opcode Input Library 


//SYSIN * Optional/Additional Opcodes 
SSK, ISK 


/* 

//SORTWKO1 UNIT=SYSDA,SPACE=(CYL,(4,1)) Sort 

/ /SORTWKO2 UNIT=SYSDA, SPACE=(CYL,(4,1)) Work 

//SORTWKO3 DD UNIT=SYSDA,SPACE=(CYL,(4,1)) Data Sets 

//SYSOPLIB DD DSN=INT.SYMREL,DISP=SHR Op-code Directory Library 
// DD DSN=SYS1.MACLIB,DISP=SHR (or Libraries) 


Sample output (SYSIN was omitted) is shown on the following two 
pages. 
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$LUCCALL 
ACCTYPES 
ANALYZ 
ASMPCM 
ATTRIB 
RHER 
BLHTRACE 
BLOCKCD 
BNGIIALL 
BNGIMI 
PXGISALL 
BNHR 
BROADRTN 
BT AMSTAT 
BIVERO 
CA 
CALL3890 
CFMSMAC?2 
CHKAL 
CHKRG 
CKWORK 
CNTO1MOO 
CORUPCLD 
COPYSS 
CTPRFORM 
DATETIME 
DOQDSTBL 
DEFAREA 
DEULIST 
DISCONV 
DL VRP 
URMVCL 
OSGA 
DSIDATIM 
DSIIFR 
OSTONT 
DSISAV 
oSITve 
DS40TRDM 
ENDL TPRMC 
EDITOO9 
cNQ 
ERRSTMSG 
EXLST 
FNHOR 
FEMACGBL 
FINTUAER 
FGES 
FUNCT 
GDCDS 
GENCB 
GEOS 
GETPHYSC 
GFEDSECT 
GPSS 

9 


SLUCCV 
ACI 

AS 
ASMTRTAB 
BATCHFAK 
BHR 
BLINE 
BLOCKCW 
BNGIIBTT 
BNGIM2 
SNGISPIT 
BNLR 
BRODOSECT 
BT AMWORK 
BIVERIFY 
CALCRBN 
CAPLST 
CHANGE 
CHKA2 
CHKRQ 
CKWORKI 
COBLOGCH 
CODE 
COUNTER 
CTBL 

DB ADACHK 
DDOENYV 
DEFAULTS 
DEVICE 
DISPATCH 
DO 
ORNXTF 
DSGANL 
DSIDCT 
OSILCS 
DSIOPN 
DSISCER 
OSTUSE 
OVAOCDIFY 
ED ITO00 
EXIT3270 
ENQDSECT 
ERRTBLKD 
LXLVS 
FDOITCB 
FEPSS 
FIXSECT 
FRACHECK 
GAMFGES 
GOPO 
GENERTRN 
GEPT2 

GE TPOOL 
GFEINTEC 
GRAPHICS 
GTNN 


SLUCLASS 
ADDUSR 
ASCBCHAP 
ASYDSECT 
BCGROUP 
BINSRCH 
BLMSGCOL 
BLR 
BNSTIERR 
BNGIOALL 
BNGISER® 
BNMR 
BSCDIAL 
BTERM 
BIVRBTB 
CALL 
CANCELMG 
CHANGKEY 
CHKAS 
CHKSN 
CKWORK2 
COBOLGN 
CODE TRNS 
CPLUNCSS 
CTRGROUP 
DBCHKDSP 
DDQFH 
DEFCCY 
DEVLISTC 
DISPGUIO 
DOM 
DRPOS 

OS TAMH 
OSINDT 
PSTLOD 
DSIPAS 
OSISCE 
DSIWAT 
DVT 
EDITOOL 
ENARALE 
ENTER 
FSETL 
EXMVE 
FDOPLOAD 
FEMSGEQU 
FLOGFN 
FROSECTS 
GBFLM 
GORD 
GENESTSS 
GEPM 
GETISCAN 
GIALC 
GRE AD 
CTRACE 


$LUCSB 
ANJTCPA 
ASCTR 
ASYNCH 
BCS 

BLOL 
BLOCKA 
BLS 
BNGTILC! 
BNGTOBIT 
BNGISLC1 
BNOR 
BSCLE ASE 
BTERR 
BUF ING 
CALLDISP 
CARRIAGE 
CHAP 
CHKA4 
CHK YN 
CKx3270 
CobpPC 
COMMAND 
CPUIOSND 
CTRLIST 
DBMCHECK 
DOQINSFE 
DEFINE 
DEVSETNG 
DISPLAY 
DRDISK 
DRS AVE 
DSIART 
DSIDEL 
OSIMBI 
DSIPDB 
OSISCT 
DSIWCS 
DWF 
EDITOO2 
E NDFLD 
ENTR 
ESTAE 
EXSS 
FOPSEND 
FEOV 
FLOSYM 
FREE RUF 
GBINF 
GDUAS 
GENFTASLE 
GLSO 
GFTSEG 
GINIT 
GRE ADE 
GTRU 


$LUC YN 
AIODATA 
ASGNBFR 
ASYNCLODR 
BDEVICE 
BLOVRP 
BLOCKAD 
BMHOOO 
ANGTILC2 
BNGIOERR 
BNGISLC?2 
BNPR 
BSEGMON 
ATLCEX 
BUILO 
CALLGFE 
CATALOG 
CHCKPTSS 
CHKBI 

CI 
CLOSOWNS 
COBPCL 
COMMBUF 
CRE ATEGF 
CTRSCHED 
DBRSTRT 
DDGINTFC 
DEFS YM 
DEVTABL 
DISPSET 
DROUSUB 
DRTAB 
DSICBH 
OSIDKS 
DSIMBS 
DSIPOS 
DSISNT 
OSIWLS 
DXR 
EDITO03 
ENDGROUP 
ENVIRON 
EVENT 
EXT 
FORLIST 
FESEND 
FLOAVALS 
FREE DBUF 
GBPOS 
GDNULIST 
GENINDEX 
SET 
GETSPA 
GMV A 
TcROQUP 
STSTIZE 


REQUESTED 


AAAAAAAA 
ATOGRP 
ASLIST 
ATLAS 
ADIAL 
BLE 
BLOCK Aw 
BAR 
BNGIIMANI 
BNGIOLC! 
BNGISMNI 
BNZR 

8SP 
BTIMDSECT 
BUILDRCD 
CALLIF 
CATCH 
CHECK 
CHKDE 
CIRB 
CLOSE 
COBPUT 
CONF IGUR 
CREATSIM 
CUTOFF 
Oca 

DD QNOD 
DELETE 
DEVTYPE 
DISRE ORG 
ORF MF IND 
DRUSC ALL 
OSICcBS 
OSTOQGT 
OSIMOS 
DSIPRS 
DSISSS 
OSIWTO 
DYNALLOC 
EOITO04 
ENDINTAB 
EOV — 
EVENTS 
EXTERAM 
FECO 
FESTAE 
FM 
FREEMAIN 
GPPST 
GNUTRANS 
GENRDT 
G& THUF 
GETTHRED 
GMVN 
GSPLC 


"OP-CODE® 


ABEND 
ALTREPRT 
ASMLOGCH 
ATTACH 
BE INSTCK 
BLER 
BLOCKBH 
BNER 
BNGIIMN2 
BNGIOLE?2 
BNG ISMN2 
ROR 
BSTAT2 
BINSG 
BUNKRAPO 
CALLOVLY 
CCI 

CHE CKPT 
CHK HE 
CKFIT 
CLSOST 
COBREENT 
CONVERSE 
CRUACH 
CV 

DOCRD 
DDQ@SECTS 
DELOAD 
DFR 
DLETE 
ORF ORM 
DRUSPARR 
DSICES 
DSTIOSB6 
DSIMGS 
OSIPSS 
OSIEVL 
DS IXMH 
DY"DSECT 
EDTT005 
END MAP 
ERASE 
EXC 
EXTRACT 
FECMDSEC 
FIELD 
FORMAT 
FREE POOL 
GCNL 

GV 
GENSN 
GFETDEV 
GETVRE 
MOP 2 
GSPEXS 


SITTER" é “TXT 


DIRECTORY 


ABTOTEND 
AKDS ADMP 
ASMONC 
ATTEN 
BER 
BLHIN 
BLOCKBO 
BNGIAL 
BNGII3?27 
BNGIOMNI 
BNG1IS327 
BPR 

BT AMLINE 
BTSAMP 
AUR 
CALLRIM 
COAL 
CHECKPTS3 
CHKPT 
CKLIWK 
CNCCHE CK 
COBS TORF 
CONVERT 
CST 
CVTBL 
DONF IND 
DOQGSTART 
DE MF 

OF TRMLST 
OLI6é 

OR HELP 
DRXMIT 
DS ICLB 
OSIOSRB 
DS IMVT 
OSIRDS 
DSISNB 
OSIZCS#S 
DYNLINK 
EDITOOSG 
ENDMODE 
ERRLALKOD 
EXxcP 
EXTRT 
FECMMOD 
FIND 
FORMGEN 
FREFEVRE 
SCNOP 
GECFK 
GENSEC 
GETIX 
GEVIP 
CNOP4 
GSERV 
CUSTOR 


ACB 
AMDSADM2 
ASMPC 
ATTNING 
BE TAMOD 
BLHOT 
BLOCKBW 
BNGIAT 
BNGIL1 
BNG IOMN? 
BNGI32 
BOBOCOMN 
BTAMSCTS 
BISEARCH 
eVBASE 
CALLTSSR 
CFMSINTF 
CHGNTRY 
CHKPTOST 
CKOVLYNO 
CNTLCHR 
CoBuPC 
COPRE 
CSTBL 
DAR 
DOQDELFE 
ODQWTO 
DEQ 
OIALTABL 
DLINT 
DRINIT 
DSEOSECT 
DSICLS 
OSIFRE 
OSINAT 
OSIRET 
DSITIA 
OSIZVSMS 
DYNLLOAD 
EDITOO? 
ENDREQ 
ERRORMSG 
EXCPYR 
FAKEDISP 
FEERR 
FINDDD 
FORTLINK 
FIBLISTC 
GCNTRL 
GECP 
GENTABL 
GETLINE 
SEVM 
GONFL 
GSRT 
OWRITE 


08/06/81 


ACBVS 
AMGINTFC 
ASMPCL 
ATTOTRS 
BHE 
QLHSTRC 
AL OCKC 
BNGIER 
BNGIL2 
BNG10327 
BNGTDEMF 
PABOJOR 
BTAMSIM 
BTSPA 
BZR 
CALL3886 
CFMSMACI 
CHI 
CHKREG 
CKREQ 
CNTRL 
COBUPCL 
COPY 

cT 
DATBASXT 
DOADS 
DDSASECT 
DETACH 
DISABLE 
OLINTIN 
DRMOVE 
NSG 
OSICWB 
OSIGET 
DS101S 
OSISAT 
DSITID 
DSPLY 
ECHOMSG 
EDITO08 
ENDSEG 
ERRSTATS 
EXECRPL 
FOETL 

FE INS TOK 
FINDQNUP 
FORWARO 
FULLSCR 
GDBSTUP 
GEN 
GENVERB 
GETMAIN 
GIF 

Cen] 

GS xy 
HARGUP 


PAGE 


di xtpueddy 


€cc UdS 


78 /T 


SUPIZOIg eUeIazeaey ss0I4 


6S 


C 


OP-CODE 


$LUCCYV 


S$LUCLASS 


$LUCYN 


ABEND 


MEMBER 


SLUCCY 


VICSB 


SLUCLASS 


TCOMLINK 


VICcss 


VTICVB 


VILS8 


S$LUCSRE 


SLUCYN 


LC OMP 


ABTOTEND 


ATTOTRS 


BLHOT 


RPHCOO 


ET AML INE 


OSNAME 


°OP-CONE * 


SOURCE RECORD 


ABORT 


ERRNOTF 


SLUCCV 


SLUCCV 
$LUCCYV 
SLUCCV 
SLUCCV 


S$LUCLASS &VALUE=e&MACROA= 


SLUCLASS 


SLUCLASS 


C 


RSUBs&VALUF o& IDNVAL 9 &8DEF 


LDe&PANDTNG1) oe hDOVEN1) 
2eRPADING2) pe80VC2) 
SeSPADOUT (1 Vogt OVC 3) 
4s&PADOUT (2 do ep & DVI 4) 


MACRO=VTC SB oVALUE=&8COMPT YP 


OCCURRENCE CROSS-REFERENCE LISTING 


VALUE =8VT AM(ET ) pMACRO=ICOMLINK 


08706/8A)1 


JA 


S$LUCLASS MACRO=VICVEsVALUE=8COMPTYP FLSE GET FROM COMPTYP 


SLUCLASS 


SLUC YN 
SLUCYN 
$LUCYN 
SLUC YN 
SLUCYN 
SLUCYN 


SLUCYN 


SLUC YN 


ABEND 


ABEND 


ABEND 


ARFND 


ANE NA 
APTND 


RLSERSP s&RLSERSP 0] 


CRT»E&CR 


CONV eSCONV) DO 
SEGLOCK o&SE GLOCKe1 


LOGs&LO 


Te0 


Gel 


MACRO =VTL SB yg VALUE =8LUTYPE 


BIT 
BIT 
RIT 
BIT 
BIT 


LS YNCHe ELSYNCHe IN sCOPPL=VES 


&NAME sEVALUES&DEF es &COMPL=NO 


TPUP e&8TPUP, 1 


017.DUMP 


1021,0UMP 


21eDUMP 


777%—eD0UMP 


045,D0tIMP 
004 «DUMP 


PUN = & 


BIT 5 


DEF TS TPUP=VYES 


MeHe 


$1168 


1/13/92 


PAGE 


00020000 


00790000 
r0750000 
10760000 
00770000 


n0U20000 


00324080 


20300000 


NNS30000 


90300000 


00130000 
90140000 
n0150000 
00160000 
n0170000 
00180000 


n0002000 


91180000 


N0033000 


tn007200 


16243000 


n0557000 


1460555 
n3100000 


Jj xtpueddy 


€cc UdS 


78/T 


smeiZ01g aoueiezey ss015 
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F.8 IAIMXRF1 and IAIMXRF2--CSECT Sizes, Entry Points and External 
Symbols 


This program produces a listing (PSIZE) of the sizes of all CSECTs 
within member names in a load library, in K (and/or fractions thereof) 
and hexadecimal, as well as entry point (PNTRY) and external reference 
(PXTRN) cross-references. The input library (DMOD) is a load module 
library. 


Sample JCL appears on the following page. 
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/ /TAIMXREF JOB 


//STEP1 EXEC 
//STEPLIB DD 

/ /DMOD DD 

/ /DNIRY DD 
// 

// 

/ /DXTRN DD 
// 

// 


//PSIZE DD 
//SYSPRINT DD 
//* 

//STEP2 
//SORTLIB DD 
//SYSOUT ODD 
//SORTIN DD 
//SORTWKO1 DD 
//SORTWKO2 D 
//SORTWKO3 DD 
//SORTOUT DD 


//SYSIN DD 


/* 
//STEP3 EXEC 
//SORTLIB DD 
//SYSOUT DD 
//SORTIN DD 
//SORTWKO1 DD 
//SORTWKO2 DD 
//SORTWKO3 DD 
//SORTOUT DD 
// 

// 

//SYSIN DD 


/* 

//STEP4 EXEC 
//STEPLIB DD 

/ /PNTRY DD 
//PXTRN DD 
//INXTRN DD 
//INNTRY DD 
//SYSPRINT DD 


SORT FIELDS= 


SORT FIELDS= 


Sample output is shown on the following three pages. 
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» «+ yREGION=512K 
PGM=IAIMXRF 1 
DSN=INT.MODREL , DISP=SHR 
DSN=INT.MODREL, DISP=SHR 
DSN=&&NTRY , DISP=(, PASS), 
SPACE=(2400,(100,100)), 
UNIT=SYSDA, DCB=BLKS IZE=2400 
DSN=&&XTRN, DISP=(, PASS), 
SPACE=(2400,(100,100)), 
UNIT=SYSDA, DCB=BLKS IZE=2400 
SYSOUT=A, DCB=BLKSIZE=1210 
SYSOUT=A 


PGM=SORT 

DSN=SYS1.SORTLIB, DISP=SHR 
SYSOUT=A 
DSN=&&NTRY , DISP=(OLD, DELETE) 
UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) 
UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) 
UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) 
DSN=&&NTRYS , DISP=(, PASS), 

SPACE=( 240, (300, 300)), UNIT=SYSDA, 


DCB=(RECFM=FB , LRECL=24 ,, BLKS IZE=240) 
* 


(1,8,A,17,8,A,9,8,A) , FORMAT=CH 


PGM=SORT 
DSN=SYS1.SORTLIB,DISP=SHR 
SYSOUT=A 

DSN=&&XTRN, DISP=(OLD , DELETE) 
UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) 
UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) 
UNIT=SYSDA, SPACE=(CYL, (3), , CONTIG) 
DSN=&&XTRNS , DISP=(, PASS), 

SPACE=( 240, (300, 300)) , UNIT=SYSDA, 


DCB=( RECFM=FB, LRECL=24, BLKS IZE=240) 
* 


(1,8,A,17,8,A,9,8,A) , FORMAT=CH 


PGM=IAIMXRF 2 

DSN=INT .MODREL , DISP=SHR 
SYSOUT=A, DCB=BLKS IZE=1 210 
SYSOUT=A, DCB=BLKSIZE=1210 
DSN=&&XTRNS , DISP=(OLD, DELETE) 
DSB=&&NTRYS , DISP=( OLD, DELETE ) 
SYSOUT=A 
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Program Load Library 
Input Library 
Entry Points 

to be sorted 


External References 
to be Sorted 


CSECT sizes output 
Message Data Set 


Entry Point Sort 

OS Sort Routines 
Sort's System Messages 
Entry Points 

Sort 

Work 

Areas 

Entries to be Printed 


External Reference Sort 
OS Sort Routines 
Sort's System Messages 
External References 
Sort 
Work 
Areas 
External References 

to be Printed 


Program Load Library 
Entry Points List 
External References List 


Message Data Set 


Appendix F 


CORE ESTIMATES ORDERED BY MODULE 


MEMBER 
NAME 


AAAAAAAA 


ABTOTEND 


AMGINTFC 


ASYNCH 


ASYNCLOR 


ATTOTRS 


BATCHPAK 


PAGE 


1 


CSECT 
NAME 


AAAAARAAA 


ABTOTEND 
TOTABRTS 


AMGINTFC 


ASYNCH 


ASYNCLDR 


ATTOTRS 


BATCHPAK 


SIZE 
(K) 


0.4 
0-8 


0.5 


0-1 


SPR 223 


(HEX) 


004A 


0016E 
00328 


00204 


00079 


00198 


00108 


OO3SE5 


1/84 
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PAGE 
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LISTING BY ENTRY POINT 


ENTRY PT 


AAAAAAAA 
ABNOCANC 
ABTOTEND 
ACCESS 


ACCT ABLE 
ADCON? 
ADJSWTCH 
AEICLOWN 
AE IOUTPT 
AEISNAP 


AEISTUP 
AIDCSECT 
ALLOCATE 


ALOG 
ALOG10 
AMGINTFC 
ANSWER 
ARITHA 
ASMTOLI 
ASYNCECB 
ASYNCH 
ASYACLOR 
ASYNECBS 
ASYNMSSC 
ATTNRT 
ATTCTRS 
AUTO TSUP 
RBAOCONUM 
BAOPRM 
BAOVMI 
BATCPPAK 


BOT AL 
SE001T 
BEON06!1 
REAOTI 
BEOOST 
BFA*STRT 
BINSRCH 


RINSRCHO 
RITSECT 
BIOOIA 
RID021 


1 


CSECT 


AAAAAAAA 
SPIESNP2 
ABTOTEND 
IXFMOND1 
IXFMONO1 
RSMGMNT 
THCFCVTH 
IRCEFNTH 
P™TCLOWN 
P™IOUTPT 
PMIDCB 
PMIOCB 
PMYSTUP 
AIOCSECT 
IXFMONC]1 
I XFMONO1 
IHCSL OG 
IHCSLOG 
AMGINTFC 
CNTOIMON 
IHCEFNTH 
SBTSK 
ASYNCECB 
ASYNCH 
ASYNCLDR 
DELOAD 
ASYNMSG6C 
GRAPHICS 
ATTOTRS 
TPUMRES 
SUBOUTPT 
SUREDIT 
SUBOUTPT 
BATCHPAK 
BATCHPAK 
BOTAL 
WTOSECU 
WTOCPID 
WTOCPIO 
WTOCPIO 
BTAMSTRT 
BINSRCH 
BINSRCH 
SINSRCH 
BINSRCH 
BITSECT 
BSITSECT 
WTOVREY 
WTOVRFY 


MEMBER 


AAAABAAAA 
SPIESNAP 
ABTOTENO 
IXFHNDO!L 
PMIEXYLD 
MANAGER 
INTVL 
INTVL 
CLOSOWN3 
PMTOUTPT 
PMIDCA 
PMIEXLO 
STARTUPS 
BLHIN 
IXFHNON 2 
PMIEXLD 
INTVL 
INTVL 
AMGINTFC 
CNTOINOD 
INTVL 
SBTSKOLI 
SycT4co 
ASYNCH 
ASYNCLDR 
DELOAD 
wromMon 
FRAPHICS 
ATTOTRS 
TPUMSS 
PMIOUTPT 
PMTENTT 
PMIOUTPT 
BATCHPAK 
PMIEXLO 
ROYAL 
SFCURE 10 
CPUIDSNO 
CPUTOSNN 
COU IOSND 
PMIBTSTR 
BINSRCH 
IAIMMOCR 
RIYSRCHY 
TAIMMOCR 
PMIFYLD 
SPAEYT 
ATVERIFY 
RTVERIFY 
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PAGE 


LISTING 


EXT-REF 


ABNOUCANC 
ABTITFND 


ACCESS 


ACCTABLFE 
ADABAS 


ADCON® 
ADDREC 
ADJSWTCH 


AIOCSECT 
AIDOATA 


ALLOCATE 


ALOG 
AMGSTART 
ANALYZFR 


ANSWER 
ART TH# 
ASYNCECA 


ASYNCK 


ASYACLODR 


ASYNECBS 


1 


CSECT 


STAERTRY 
TOTABRTS 
TOTSTART 
SPAEXT 
REENTSB1 
SPAEXT 
LPSPA 
RMTRACE 
ORADACHK 
OBRSTRT 
IFCECOMH 
THCEFNTH 
IRCETRCH 
SPAEXT 
SPAEXT 
ITHCECOMH 
BLHIM 
BLHIN 
VTCOM2 
VISTART 
SPAEXT 
REENTSB1 
SPAEXT 
LPSPA 
INTVL 

I XFMONOO 
IXFMONODO 
RMF NQ 
RMPC 
RSMGMNT 
STAERTRY 
IHCECOMH 
BATCHPAK 
I JKTLOOP 
MRCSAMOD 
BATCHPAK 
SPA 
STUOVLY 
SPAEXT 
SPAEXT 
STUOVLY 
SPAEXT 
SPAEXT 
STUOVLY 
PMIOLOAD 
SPAEXT 

S PAE XT 
PMISTUP 
STUOVLY 


SPR 223 


BY EXTERNAL REFERENCE 


MFMBER 


STAERTRY 
AATOTEND 
TOTSTART 
PMIFXLO 
REENTSBS 
SPAEXT 
SPALP 
R#MTRACE 
DRBADACHK 
OBRSTRT 
INT VL 
INTVL 
INTVL 
PPIFXLD 
SPAEXT 
INTVL 
BLHIN 
BLHIN 
VTICDM2 
VISTART 
PMIEXLD 
REENTSBS 
SPAEXT 
SPALP 
TNTVL 
IXFHNDOO 
PMIEXLD 
MANAGER 
MANAGER 
MANAGER 
STAERTRY 
INTVL 
BATCHP AK 
IJK TLOOP 
MRCSAMOD 
PMEEXLD 
PMISPA 
STARTUPS 
PMIEXLD 
SPAEXT 
STARTUPS 
PMILEXLO 
SPAEXT 
STARTUPS 
PMIDLOAN 
PMTEXLD 
SPAEXT 
STARTUPS 
STARTUP3 
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F.9 TAIMDREF--DSECT OCCURRENCES 


This program requires, as input, a PDS containing the spooled 
print output of assemblies of all members (programs) to be cross- 
referenced. Currently, for Intercomm, this data set occupies an entire 
3330-1 (3330 MOD II) disk pack. Therefore, IAIMDREF is not supplied as 
a program to be executed at the user site. Instead, the output (with 
the name IAIMDREF) is supplied on microfiche (see the fiche index) as a 
separate page when an Intercomm release is issued. A new listing is 
also supplied with each periodic microfiche update, incorporating 
members which have been updated by SM. 
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F.10 RETURN CODES AND ABENDS 


Module Return 
Name Code Meaning 
IAIMCOCR 4 |DCB Open Error. Check JCL. 


100+ |Error in Sort Phase: 
Return code minus 100=sort-return-code. 
IAIMGOCR 4 |Unable to open DCB. Check JCL for SYSLIB, SYSOUT. 
Attempted to cross-reference a SYSLIB data set with 
DISP=NEW or DISP=MOD. 
12 |SYSLIB data set organization (DSORG) not PS or PO. 
16 SYSLIB RECFM is V or U. 
20 SYSLIB LRECL is not 80. 
24 |GLOBAL DD statement missing. 


IAIMGOC2 4 |DCB Open Error. Check JCL. 
IAIMMOCR 4 {Unable to open DCB. Check JCL. 
8 |Invalid SYSIN control card. 
100+ |Error in Sort Phase: 
Return code minus 100=sort-return-code. 
IAIMMRF 1 4 |Unable to open DCB. Check JCL for SYSLIB, SYSOUT. 
8 |Attempted to cross-reference a SYSLIB data set whose 
DISP=NEW or DISP=MOD. 
12 |SYSLIB data set organization (DSORG) not PO or PS. 
16 |SYSLIB RECFM is V or U. 
20 |SYSLIB LRECL is not 80. 
TAIMMRF 2 4 |Unable to Open DCB. Check JCL for SYSLIB, SYSOUT. 
8 |Attempted to cross-reference a SYSLIB data set whose 
DISP=NEW or DISP=MOD. 
12 |SYSLIB data set organization (DSORG) not PO or PS. 
16 |SYSLIB RECFM is V or U. 
20 |SYSLIB LRECL is not 121. 
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Module Return 

Name Code Meaning 

IAIMOPCD 4 |Error occurred (see accompanying WIO message) 
ITAIMXRF 1 12 |FIND macro error condition on input load module 


library. 


24 |Unable to open input load module library. 
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